use Win32::OLE; my $objShell = Win32::OLE->CreateObject("Shell.Application"); my $objFolder=$objShell->Namespace("c:\\a") or die "$!" ; my $a = $objFolder->ParseName("a.txt") or die "$!" ; print $objFolder->GetDetailsOf($a, 8) or die "$!" ;
In reply to Re: Win32::Perms for ActivePerl 5.12/5.10 x64
by Derek Lin
in thread Win32::Perms for ActivePerl 5.12/5.10 x64
by Derek Lin
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |