Select Code to Download

#!/usr/bin/perl

...
print 'Some content here'."\n";
print '</body></html>'."\n";

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