Help for this page

Select Code to Download


  1. or download this
    my $first_line = <DATA>;
     
    while (<DATA>) {
      ...
    }
    
  2. or download this
    while (<DATA>) {
      next if $. == 1;
    }