[kwlug disc.] find and replace

Tue Jan 23 23:36:04 EST 2007

Is there an easy way to do a command line search and replace with the 
replace being a block of complicated text?  i.e I want to insert about 
10 lines of php code into all the files in a directory at a specific 
spot in each file (after the <body> tag actually).  Using sed or perl -i 
-p -e is clunky to say the least - too much escaping of characters.  
Ideally a 'search, and replace with contents of this file', but I'm not 
seeing how to do this.