Select Code to Download

my @keys = grep { $hash{$_} eq 'value' }keys %hash;

my %value;
push @{ $value{ $hash{$_} } }, $_ for keys %hash;
...
        print "\t$_\n" for @{ $value{$_} };
    }
}