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

Question

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

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

Спасибо

splintor

Answer 1

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

Answer 2

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

chmod 0777, $filename;

Используется восьмеричная запись chmod .

Я использую Strawberry Perl 5.8.8 в 64-битной Windows Vista.