[CODE]
#!/usr/bin/perl

use CGI;
my $q = new CGI;
print $q->header(-type => "text/html");
print " Hello, world! ";
exit;
[/CODE]