Select Code to Download

print "...html 1..." if ...condition_1...;
print "...html 2..." if ...condition_2...;
...

foreach (keys %formdata) {
   print "...$formdata{$_} ...";
}