Select Code to Download

#!/usr/local/bin/perl -w
print "Content-type: text/html\n\n";
...
print "</body></html>";
exit(0);
}