$datei_pfad=$pfad.$zeile;
               
 $datei_pfad=~ tr/\//\\/;   
               
 push (@safe_datei,"\"$datei_pfad\"")
               
 }