while ( my $line = <$file> ) {
     next if 1 .. 14;
     do_stuff;
}