perl header

Hi,
I am writing a perl script to run on apache server.
IT DOESNOT RUN...it gives some Internal Server Error

I belive we need to put certain headers in script to run it.
Can anyone help me in this

thanks

my script is as follow:

#!/usr/bin/perl
use strict;
use Mysql;
my $DBHOST = "localhost";
my $DBNAME = "vidhu";
my $DBUSER = "root";
my $DBPASS = "";
my $DB = Mysql->connect($DBHOST, $DBNAME, $DBUSER, $DBPASS);
#my $qry = qq~SELECT * FROM test~;
my $sql_qry="select * from test";
my $qry=$DB->query($sql_qry);
while( my @emps = $qry->fetchrow)
{
print "<html> qq~ $emps[0], $emps[1],<br>~</html>;
}

vidhu