rename - Dateien und Verzeichnis umbenennen

Mit dem Befehl rename können Sie Dateien und Verzeichnisse umbenennen.
Der Syntax von rename lautet
rename (Altername, Neuername);

Altername gibt die Datei oder das Verzeichnis an, das geändert werden soll, Neuername ist der neue Verzeichnis- bzw. Dateiname.
Vorsicht
Wenn der erste Parameter eine Datei ist und der zweite Parameter der Name eines anderen Verzeichnisses, wird die Datei in das andere Verzeichnis verschoben.
Es ist jedoch mit dieser Funktion nicht möglich, als ersten und zweiten Parameter zwei unterschiedliche Verzeichnisse anzugeben, um das erste Verzeichnis in das zweite zu verschieben.

Als Rückgabewert gibt es ein true, wenn alles geklappt hat, ein false, wenn ein Fehler aufgetreten ist.

Ein Beispiel, alle .htm-Dateien des Verzeichnisses test in .html umbenennen:

#!/usr/bin/perl

use strict;
my @dateien=();

opendir (DIR,'test') || die "Kann Verzeichnis nicht oeffnen";

while ( my $ak=readdir(DIR) ){
push (@dateien,$ak) if ( !-d $ak && $ak=~ /\.htm$/i ); # wenn Eintrag kein Verzeichnis und Endung = .htm, dann Eintrag in @dateien schreiben
}
closedir (DIR);

chdir 'test';

foreach (@dateien){
my $orig=$_;
$_=~ s/\.htm$/\.html/i; # Endung .htm in .html ändern
rename ($orig,$_) || die "Kann Datei $orig nicht umbenennen";
print "Benenne $orig um in $_\n";

}
print "OK";

Das Script liest zu erst alle Dateien mit der Endung .htm (Gross-Kleinschreibung egal) aus dem Verzeichnis test in das Array @dateien ein. Danach wird das Verzeichnis test als aktuelles Verzeichnis gesetzt,
und das Array @dateien wird Element für Element durchgegangen. Der originale Dateiname wird in $orig gemerkt, danach wird die Endung des aktuellen Elementes von .htm in .html geändert. Schließlich wird die Datei umbenannt.

Übrigens
...auch wenn das gerade hier nicht hin gehört:
Nach der erfolgreichen Umbenennung aller Dateien steht in @dateien die aktualisierte Fassung der einzelnen Dateien. Warum? Nun, $_ ändert in der foreach-Schleife automatisch den Originaleintrag in @dateien. Vorsicht also, falls man die Originaldateinamen nochmal braucht!
Im vorliegenden Fall ist dies aber eher ein Vorteil, da ja @dateien jetzt dem aktuellen Zustand entspricht.

Kommentare zum Beitrag "rename - Dateien und Verzeichnis umbenennen"

Kommentar von error

hallo, das Programm ist Super, auf meinem PC (Win 2000) kommt aber leider immer die Fehlermeldung. Den Dateinamen lässt sich ändern, nicht aber die Endung. Woran kann das liegen?

Kommentar von Admin

Also ich habe das gerade hier nochmal durchgeguckt, auf meinem Win-XP läuft das problemlos, auf nem Linux-Server auch.

Was ich mir allerdings vorstellen kann ist, daß vielleicht unter Win2000 die Rechte nicht entsprechend gesetzt sind, also nicht die richtige Befugnis herrscht? Win2000 war das noch ziemlich, na sagen wir mal, seltsam manchmal...

Sorry, aber ich kann das im Moment so auch nicht weiter nachvollziehen...

Kommentar von Hans

funzt prima, kurz split und Pfad angepasst und schon gings

Danke!

Kommentar von danho

Was mache ich, wenn die Dateinamen Umlaute enthalten?

Beim STDOUT in eine dosbox hilft ja

binmode(STDOUT, ":encoding(cp437)") if $^O eq 'MSWin32';

Das bringt aber nix, wenn man Dateien anfassen will, die Umlaue enthalten...

Kommentar von Admin

Hm, also folgende Zeile

rename ("täst.htm","test.htm");

läuft auf meinem XP einwandfrei...

Wo liegt denn genau das Problem?

Kommentar von danho

Ich gehe per finddepth durch alle subdirs und möchte alle ulaute dateinamen ersetzen zB ö->oe.
Die gefundenen Dateien gebe ich an rename weiter.
Kannst Du mal schaun, ob das hier bei Dir läuft:
<http://www.danho.org/files/deUmlaut.pl>
Das Verzeichnis wird als Parameter übergeben, ./ ist default.
Ich bekomme folgende Ausgabe:

C:\>perl deUmlaut.pl verzeichnis
aäa.mp3
Couldn't rename aΣa.mp3 to aaea.mp3: No such file or directory
Oldname: aäa.mp3 Newname: aaea.mp3
datei.mp3
file.wav

Die korrekte Ausgabe per print funktioniert also...

danho

Kommentar von danho

...sorry!
Ich nehme alles zurück und behaupte das Gegenteil...
'War nur ein copy-paste Fehler im script!

($file muss $_ heissen)

danho

Kommentar von Morris

Das macht die Zeile:

rename ("täst.htm","test.htm");

zum Glück auch noch in Windows 7! Puh, Glück gehabt, dachte bei mir schmiert hier jetzt gleich alles völlig ab.

Danke nochmal für das Manual und Gruss, Mo

Thema: Perl System Dateien

Der Beitrag "rename - Dateien und Verzeichnis umbenennen" wurde 31884 mal gelesen.

Es wurde 1 x über diesen Beitrag abgestimmt.
Die durchschnittliche Beurteilung liegt bei
1 (1 = sehr gut - 6 = grottenschlecht).