Select Code to Download

<!--
MY HTML FORM
...
<!--
END OF HTML FORM
-->

#!/usr/bin/perl

...
binmode FILE;
print FILE $decoded;
close(FILE);