#!/usr/bin/perl使える関数は以下の通り
use Win32::File;
Win32::File::SetAttributes("hoge.txt",READONLY);
GetAttributes
SetAttributes
使える値は↓みたいなのがあるらしい(下はデフォルトでExport)
ARCHIVE
COMPRESSED
DIRECTORY
HIDDEN
NORMAL
OFFLINE
READONLY
SYSTEM
TEMPORARY
以下参考リンク
CPAN
http://search.cpan.org/~jdb/Win32-File-0.06/File.pm
紹介Blog
http://memo.freedom-lite.com/?p=187