Statement Perl

  1. Home
  2. Perl
  3. Statement
  4. If start with - no repeat
NUMBER: while (<>) {
    next NUMBER if /^-/;      
    print; 
}