Problem mit chmod

[Holger]

Hallo,

vielen Dank. Ich habe jetzt die Lösung gefunden:

my @fileinfo = stat($file_name);
    my $perms = '0'.sprintf "%lo",(((stat($file_name))[2]) & 0777);

Jetzt kann man $perms als string verwenden.

Und später:

chmod(oct($perms),$file_name);

Danke!

MfG Holger