for (my $i = 0; $i < 21; $i++) {
 <FILEHANDLE>;
}
# now read