String Perl

  1. Home
  2. Perl
  3. String
  4. Chomp in a while statement
while (chomp($input = <>)) {
    print "You typed: $input\n" unless $input eq 'L';
}