Help for this page
perl -pe 'goto LINE if /^2nd/' myfile
$ perl -MO=Deparse -pe 'goto LINE if /^2nd/' myfile LINE: while (defined($_ = <ARGV>)) { ... } -e syntax OK