Thread Wenn Datei existiert: Dateinamen ändern (2 answers)
Opened by pktm at 2003-12-10 20:26

pktm
 2003-12-10 20:26
#75441 #75441
User since
2003-08-07
2921 Artikel
BenutzerIn
[Homepage]
user image
Hallo!
Ich kopiere in einem Script eine Datei von A nach B.
Dabei soll sichergestellt werden, das keine Dateien überschrieben werden.
Stattdessen soll eine andere Datei mit einer Zahl vor dem suffix angelegt werden.
Das sieht bei mir bislang so aus:
Code: (dl )
1
2
3
4
5
6
7
8
9
my $file = 'c:/test.txt';
my $trashDir = 'd:/anotherdir';
my $dest = $trashDir . '/' . basename("$file",".igs") . '.igs';
my $cnt = 2;
while( -e $dest || $cnt != MAXTRASHCOPYS ){
$dest = basename("$dest",".igs") . $cnt . '.igs';
$cnt++;
}
unless( copy("$file","$dest") ){ die "Konnte keine Sicherheitskopie erstellen!"; }

Mein Problem:
Es geht nicht.
Fehlermeldungen erhalte ich keine, aber gleichnamige Dateien werden überschrieben.
Kann mir da wer weiterhelfen?
Also wenn die Datei bereits existiert soll einfach eine gleichnamige Datei nur mit einer anderen Zahl vorm Suffix erstellt werden.
mfg pktm
http://www.intergastro-service.de (mein erstes CMS :) )

View full thread Wenn Datei existiert: Dateinamen ändern