Help for this page

Select Code to Download


  1. or download this
    while(<$fh>)
{
  next  if 1..1; # skip first line
  print;
}
  2. or download this
    # intentionally not using range operator to avoid confusion
for(1,2,3,4,5) 
...
  next  if 1..1; # never returns true!
  print "$_\n";
}
  3. or download this
    my $i = 0;
while(++$i <= 5)
...
  next  if 1..1; # never returns true!
  print "$i\n";
}