Select Code to Download

#!/usr/bin/perl
print <<START;
Content-type: text/html
...
</body>
</html>
FINISH