Wie gesagt, ist ungetestet. Bei dem Regulären Ausdruck musst Du noch den "s"-Modifier hinzufügen.

Um das Einlesen der Datei mache ich eine geschweifte Klammer, weil $/ nach dem Einlesen der Datei wieder auf dem "normalen" Wert \n stehen soll. Und das Filehandle wird automatisch geschlossen wenn der Block verlassen wird. Ohne den Block kann man böse Überraschungen erleben wenn man eine weitere Datei - dann aber Zeilenweise - einlesen will...