JavaServer Pages
overhead involved with C.
Listing 1.2
shows the Perl equivalent of the CGI from
Listing
1.1
.
Listing 1.2 A sample CGI in Perl
#!/usr/bin/perl
$now = localtime(time());
print <<"<EOT>"
<HTML>
<BODY>
The time is now: $now
</BODY>
</HTML>
<EOT>