Select Code to Download

$clean_total =~ s/^\s+|\s+$//g;
$spam_total =~ s/^\s+|\s+$//g;
...
$banned_total =~ s/^\s+|\s+$//g;
$badheader_total =~ s/^\s+|\s+$//g;
$reject_total =~ s/^\s+|\s+$//g;

#!/usr/bin/perl
...
print "</body>";
print "</html>\n";