Select Code to Download

#!/usr/bin/perl -w
use CGI;
my $q = new CGI;
print $q->header;
print "<CENTER><H1>Show me the monkey!</H1></CENTER><BR>";
print $q->end_html;

#!/usr/bin/perl -w
# CGI to select data from a SQL database
...
# $co->br;
# }
print $co->end_html;