in reply to [SOLVED]How to sort the referencese

Hi baxy, I think you're looking for array slices

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

In Section Seekers of Perl Wisdom