programming-examples/perl/Statement/unless statement in while.pl
2019-11-15 12:59:38 +01:00

3 lines
58 B
Perl

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