Without resort to one of the odd tied hash modules, you can grep for keys matching the base text, my @tests = grep { /^TEST/ } keys %$result; You'll then have to sift those to get the ones you want.

The use of things that look like indexes on the hash keys suggests that you might want to use a Hash of Arrays instead.