Perl Einzeiler: Suchen und Ersetzen in Dateien