use CGI;

   BEGIN {
   use CGI::Carp qw(carpout fatalsToBrowser);
     open(LOG, ">test") or
       die("Unable to open test: $!\n");
     carpout(LOG);
     }
   
$query = new CGI;

print $query->header;
prnt "hello";

##</code><code>##

Execution of /home/xxxx/xxxx/web/cgi-bin/xx.cgi aborted due to compilation errors.

##</code><code>##

[Sun May 20 12:04:58 2001] carp.cgi: Unquoted string "prnt" may clash with future reserved word at /home/xxxxx/xxxx/web/cgi-bin/xx.cgi line 15.
[Sun May 20 12:04:58 2001] xx.cgi: String found where operator expected at /home/xxxxx/xxxx/web/cgi-bin/xx.cgi line 15, near "prnt "hello""
[Sun May 20 12:04:58 2001] carp.cgi: 	(Do you need to predeclare prnt?)
syntax error at /home/xxxxx/xxxx/web/cgi-bin/xx.cgi line 15, near "prnt "hello""
Unmatched right bracket at /home/xxxx/xxxxx/web/cgi-bin/xx.cgi line 16, at end of line
[Sun May 20 12:04:58 2001] xx.cgi: Execution of /home/xxxxx/xxxx/web/cgi-bin/xx.cgi aborted due to compilation errors.