in reply to How do I test whether a file has some contents or not?
Hmm, on the off chance that "contents" is not "text", and believing the description more than the title, I'd also add:
print "it's a non-empty text-ish file" if -s $file and -T $file;
In Section
Seekers of Perl Wisdom