Select Code to Download

print Dumper(\%hash);

 $line =~ s/\s+$//; # trim whitespace

print "<$fields[0]>\n";