Select Code to Download

print STDOUT "<FONT COLOR=\"red\">$data</FONT>";

# to print a bunch of HTML using a heredoc I would do:
print <<HTML;
...
</body>
</html>
!;