while (<>) {
    do_something($_) if (6..eof());
}

##</code><code>##

while (<>) {
    next if (1..5);
    # Whatever here
}