Select Code to Download

use strict;
use warnings;
...
{
    print "$reversehashB{$_} $hashC{$reversehashB{$_}}\n";
}