Select Code to Download

#!/usr/bin/perl
use warnings;
...
   print "$key ->  $in{$key}<br>";
   }

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

print 'here is all your output<br>';
print $output;