while (<$fh>) { next if 1 .. 1; print "$_\n"; }