Select Code to Download

#!/usr/bin/perl -wT
use strict;
...
$\ = "\r\n";
use Data::Dumper;
print Dumper(\%FORM);