in reply to inserting few lines after matching a string?

perldoc -q insert has the answer you sought.

In Section Seekers of Perl Wisdom