in reply to How do I skip reading files further with missing data?

Use the -s test:

use strict; use warnings; for my $file (qw/bar.txt barwithdata.txt/) { next unless -s $file > 114; print "file $file has data\n"; }

Note that 114 is the number for my O/S. Yours may differ due to different EOL/EOF patterns.