Select Code to Download

#!/usr/bin/perl
use warnings;
...
    print "Key$thing, Value is $somehash{$thing}\n";
}

perl test.pl
...
Key is secondname, Value is middle