习之北 2010-11-18
#!/usr/bin/perl –w
use CGI;
{
my $q = new CGI;
print $q->header(),
$q->start_html("Hello perl world!"),
$q->h1('hello perl world'),
$q->end_html();
}