Statement Perl

  1. Home
  2. Perl
  3. Statement
  4. Next statement
#!/usr/bin/perl -w
use strict;
print "Please enter some text:\n";
while () {
    if ($_ eq "\n") {
        next;
    }
    chomp;
    print "You entered: [$_]\n";
}