Select Code to Download

#!/usr/bin/perl

print "Content-type: text/html\n\n";
...

print "</TABLE>";
print "</BODY></HTML>";