5 lines
56 B
Perl
5 lines
56 B
Perl
|
|
while (<>) {
|
|
print "Too big!\n" if $_ > 100;
|
|
}
|
|
|
while (<>) {
|
|
print "Too big!\n" if $_ > 100;
|
|
}
|