require 'a.pl';

foreach (keys %test_hash){

print "$test_hash{$_}\n";

}