Guest holger

system(sed -i "s/<\/body>/foo\n<\/body>/" datei.html)

Ähm, mea culpa, meine Schnippsel waren nicht für ein Perlskript gedacht,
sondern als Futter für dein Shell-Promt :-)