Personally I would use:
Win32::File::SetAttributes() [download]
In reply to Re: Set file permissions using Perl in Windows? by hawtin in thread Set file permissions using Perl in Windows? by wilsond