Beefy Boxes and Bandwidth Generously Provided by pair Networks vroom
more useful options
 
PerlMonks  

Win32::Perms for ActivePerl 5.12/5.10 x64

by Derek Lin (Novice)
on Oct 14, 2010 at 07:11 UTC ( #865219=perlquestion: print w/ replies, xml ) Need Help??
Derek Lin has asked for the wisdom of the Perl Monks concerning the following question:

My Perl scripts will be migrated to Win2008 x64 platform and ActivePerl will be upgraded to 5.10 or 5.12 (both 64bit) from 5.8.8(32bit), but it seems that Win32::Perms does not supported for 64 bit and not support ActivePerl 5.10 or 5.12, please correct me if I'm wrong... I use Win32::Perms to get/change a file's owner, someone can help to show me a similar module about this please? Thanks. ps: sorry for my poor English, hope you can understand my question.

Comment on Win32::Perms for ActivePerl 5.12/5.10 x64
Re: Win32::Perms for ActivePerl 5.12/5.10 x64
by Anonymous Monk on Oct 14, 2010 at 14:06 UTC

      The ppd doesn't contain an x64 build, and the source code link at Roth's website is broken.

        Yes, you are right.
Re: Win32::Perms for ActivePerl 5.12/5.10 x64
by furry_marmot (Pilgrim) on Oct 14, 2010 at 17:20 UTC

    I'm using Vista x64, but Perl 5.10 32-bit, due to a couple of modules that haven't been ported to x64 and I was not able to port. I don't have anything particularly performance-dependent going, so I never tried benchmarking the 32-bit Perl versus the x64 build, but I've never noticed any speed problem and never had a problem running the same setup from my old XP box.

    Maybe you can use the 32-bit version? For what it's worth.

    --marmot

      Hi Marmot, Thanks for your reply. My system is required to migrated to Win2008 X64, the Perl scripts is a part of the system, so I don't want my Perl has to keep at the 32 bit version due to this module Win32::Perms, can you please help to give a suggestion which module can replace Win32::Perms and implemented the same function(get/change a file's owner)???
        can you please help to give a suggestion which module can replace Win32::Perms

        Not sure it does what you want but Win32::FileSecurity, which ships with ActivePerl, might be worth checking.
        I was wondering if Set( $filename, \%permisshash ); would enable you to do what you want.

        Cheers,
        Rob
Re: Win32::Perms for ActivePerl 5.12/5.10 x64
by Anonymous Monk on Oct 16, 2010 at 14:01 UTC
    Hi, The Vb script below can get a file's owner correctly, can you help to convert this Vb script to Perl script? Thanks. http://community.spiceworks.com/scripts/show/87-delete-files-by-owner
Re: Win32::Perms for ActivePerl 5.12/5.10 x64
by Derek Lin (Novice) on Oct 20, 2010 at 04:01 UTC
    List the code I using now, hope it is helpful to to the other people.
    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 "$!" ;

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://865219]
Approved by Corion
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (6)
As of 2014-04-19 16:40 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (483 votes), past polls