while (<>) { print "Too small!\n" unless $_ > 100; }