Как очистить флаг только для чтения от файла в Perl?

Мне нужно очистить флаг только для чтения файла в моей программе Perl, которая работает в Windows.

Я знаю, что system("attrib -r $filename") будет работать, но мне было интересно, нет ли встроенной опции в Perl для этого. chmod 777, $filename, похоже, не работает.

Спасибо,

splintor

Ответ 1

Попробуйте chmod 0777, $filename. Вам нужны разрешения в восьмеричной нотации.

Ответ 2

Самый распространенный способ справиться с такими вещами - это действительно с chmod. Мне удалось удалить флаг только для чтения, используя следующее с успехом:

chmod 0777, $filename;

Используется chmod nofollow noreferrer.

Я использую Strawberry Perl 5.8.8 в 64-разрядной версии Windows Vista.