Wie entferne ich das Nur-Lesen-Flag von einer Datei in Perl?

Question

Ich muss das schreibgeschützte Flag einer Datei in meinem Perl-Programm löschen, das auf Windows läuft.

Ich weiß, dass system("attrib -r $filename") funktionieren würde, aber ich frage mich, ob es keine integrierte Option in Perl gibt, um dies zu tun. chmod 777, $filename scheint nicht zu funktionieren.

Danke,

splintor

Answer 1

Versuchen Sie chmod 0777, $filename. Sie benötigen die Berechtigungen in oktaler Notation.

Answer 2

Der häufigste Weg, um mit dieser Art von Dingen umzugehen, ist tatsächlich mit chmod. Ich konnte die schreibgeschützte Flagge erfolgreich mit folgendem Befehl entfernen:

chmod 0777, $filename;

Dies erfolgt unter Verwendung der chmod oktalen Notation.

Ich benutze Strawberry Perl 5.8.8 auf Windows Vista 64 bit.