#! /usr/bin/perl -w

%data = ('name_of_hash_a' => {key => 'value'},
         'name_of_hash_b' => {key => 'value2'},
        );

for my $hashname ('name_of_hash_a','name_of_hash_b') {
  my $value = $data{$hashname}{key};
  print "Hash:$hashname Key:key Value:$value\n";
}