Select Code to Download

#!/bin/perl
print "Content-type: text/html\n\n";
...
  print "<TR><TD>$x</TD><TD>$ENV{$x}</TD></TR>\n";
}
print "</TABLE></BODY></HTML>\n";