Re: Using Perl to get "Size on Disk" in Windows

2007-06-01 Thread perlgeek
Guess I should search before I post. Just found Win32::DirSize. It is MUCH faster than my previous code below and gives exactly what I need. $Dir = "C:\\Windows"; print "\n\nGetting size of $Dir"; my $Result = dir_size($Dir, my $DirInfo); if ($Result == DS_RESULT_OK) { print "\tF

Re: Using Perl to get "Size on Disk" in Windows

2007-06-01 Thread perlgeek
Guess I should search before I post. Just found Win32::DirSize. It is MUCH faster than my previous code below and gives exactly what I need. $Dir = "C:\\Windows"; print "\n\nGetting size of $Dir"; my $Result = dir_size($Dir, my $DirInfo); if ($Result == DS_RESULT_OK) { print "\tFi

Using Perl to get "Size on Disk" in Windows

2007-06-01 Thread perlgeek
I know how to get actual file size of a directory tree with Perl but can anyone offer assistance in getting actual disk space required or what windows calls "Size on Disk" of a directory tree. Below is what I have to find actual data size of a tree but it does not take into account wasted disk spa

RE: Using Win32::OLE to Query Exchange Remotely

2007-06-01 Thread perlgeek
> The following code has the benefit of using NT credentials of the > currently logged in user. But, the currently logged in user needs to > have access in Exchange. :) > > No passwords in clear text to glean from your scripts That's > usually a good thing. :) > > $OLECon = > Win32::OLE->G