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

5 lines
90 B
Perl

while (chomp($input = <>)) {
print "You typed: $input\n" unless $input eq 'L';
}