use strict; use warnings;
use MyLib;

my $hashref = MyLib::get_data();
my %hash = %{ $hashref };
for my $key ( keys %hash ) {
    printf( 'Value of `a` in %s is %s', $key, $hash{ $key }->{'a'} );
}

__END__