in reply to How to read zipped file in perl

Try escaping the hash... print Dumper(\%result);

print "Good ",qw(night morning afternoon evening)[(localtime)[2]/6]," fellow monks."

In Section Seekers of Perl Wisdom