Guest Florian

Code: (dl )

  $FilePath =~ tr/\//\\/;

Bei Perl brauchst du dich nicht darum zu kümmern, wie der Zeilentrenner bei deinem BS aussieht. Wenn du den Backslash in der Ausgabe haben willst, verschiebe diese Zeile in den if-Block.