You could use the flip-flop operator (..).

$ cat lines
line 1
line 2
line 3
line 4
line 5
line 6
$ perl -ne 'print if $. == 3 .. eof;' lines
line 3
line 4
line 5
line 6
$ perl -ne 'print if /5/ .. eof;' lines
line 5
line 6
$
[download]

I hope this is useful.

Cheers,

JohnGG