How to insert the content of a file into another file (if regexp) in perl/shell How to insert the content of a file into another file (if regexp) in perl/shell shell shell