I'm trying to write a program to change permissions on the mail folders. I found a pre-written program that should accomplish this but am just learning Perl. This is my questionable code:
my ($file, %perms, $account, $mask, @rights);
foreach $file (@ARGV) {
next unless -e $file ; # make sure if exists
if (Win32::FileSecurity::Get( $file, \%perms ) ) {
What the hell is @ARGV and how do I write the array? Thanks for any help!
my ($file, %perms, $account, $mask, @rights);
foreach $file (@ARGV) {
next unless -e $file ; # make sure if exists
if (Win32::FileSecurity::Get( $file, \%perms ) ) {
What the hell is @ARGV and how do I write the array? Thanks for any help!