...
 $datei_pfad=~ tr/\//\\/;
...