3 lines
58 B
Perl
3 lines
58 B
Perl
|
while (<>) {
|
||
|
|
print "Too small!\n" unless $_ > 100;
|
||
|
|
}
|