Select Code to Download

use strict;
use warnings;

...
        print "$inner_key $hash{$key}->{$inner_key}\n";
    }
}