Select Code to Download

%hash = %{ grep { has_the_right_primary_key($_) } @hashes };

%hash = %{ ( grep hash_the_right_primary_key($_), @hashes )[0] };