use Data::Dumper; ... your code ... print "Search: ", Dumper(\%serchstrx),"\n";