Für sowas reicht auch eigentlich ein Einzeiler:

perl -ne'/flupp/ && ++$found; print if $found' < inputfile > outputfile