RE: Archive::Zip - Bad file descriptor on directories

2005-04-01 Thread Ben Conrad
From: Sisyphus [mailto:[EMAIL PROTECTED] Sent: Wednesday, March 30, 2005 11:59 PM To: Ben Conrad; perl-win32-users@listserv.ActiveState.com Subject: Re: Archive::Zip - Bad file descriptor on directories - Original Message - From: "Ben Conrad" <[EMAIL PROTECTED]> To: Sent: Thu

Archive::Zip - Bad file descriptor on directories

2005-03-30 Thread Ben Conrad
__ This email has been scanned by the MessageLabs Email Security System. For more information please visit http://www.messagelabs.com/email __

RE: Counting total elements in a reference

2005-03-10 Thread Ben Conrad
u want. At 04:22 PM 3/10/05 -0500, Ben Conrad wrote: >print "$ValueString->[0] \n $ValueString->[1]"; >>> \Device\{531DA74F-9197-42AA-B8D8-BDA2E6F86908} >>> \Device\NdisWanIp -- REMEMBER THE WORLD TRADE CENTER ---=< W

Counting total elements in a reference

2005-03-10 Thread Ben Conrad
t the total number of elements in this reference? I'm thinking something similar to $num = scalar(@array). Thanks, Ben Ben Conrad Sr. Network Administrator 180 Old Colony Avenue Quincy, MA 02170 Passkey International, Inc. [T] 617.237.8225 [M] 617.852.6206 [F] 617.328.1461 http://www.passkey

Variable in a repeating pattern?

2005-02-15 Thread Ben Conrad
Hi, This works and gives me the first 3 chars of my string: ($hoststr) = $hostname =~ /(^\D{3})/; Is it possible to do this so I can make the length of the repeating pattern a variable? It's not working for me. $length = 4; ($hoststr) = $hostname =~ /(^\D{\$length})/; Thanks, Ben _

Need help with splitting multi-line var

2004-11-10 Thread Ben Conrad
Hi, I'm have the following multi-line variable: $a = qw( Date: Thu, 3 Jun 2004 16:59:26 -0400 Message-Id: <[EMAIL PROTECTED]> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii ); When I split it with @b = split (/\n/, $a); All I get in @b is the last "word" in the variable (cha

RE: RFC Expunge issue with Net::IMAP::Simple .95

2004-11-03 Thread Ben Conrad
- BLS CTR [mailto:[EMAIL PROTECTED] Sent: Wednesday, November 03, 2004 4:54 PM To: 'Ben Conrad'; [EMAIL PROTECTED] Subject: RE: RFC Expunge issue with Net::IMAP::Simple .95 The _process_command() routine processes its 'cmd' arguments in order, so you should be able to simpl

RFC Expunge issue with Net::IMAP::Simple .95

2004-11-03 Thread Ben Conrad
to act in the same way. Is there a way I can modify simple.pm to reorder the commands, I'm not too familiar with modifying perl modules. >> from simple.pm $VERSION = '0.95'; sub expunge_mailbox { my ( $self, $box ) = @_; _escape( $box ); return $self->_proces

RE: OLE and access denied with Admin account

2004-11-01 Thread Ben Conrad
min account). I took out the account and put in the local Administrators group and now the script is working. -Original Message- From: Ben Conrad [mailto:[EMAIL PROTECTED] Sent: Monday, November 01, 2004 11:17 AM To: [EMAIL PROTECTED] Subject: OLE and access denied with Admin acco

OLE and access denied with Admin account

2004-11-01 Thread Ben Conrad
Hello, perl 5.8.3.809, win2k sp4. I am having a problem running a script from within the Task Scheduler, it is bombing at: $CLASS = "winmgmts:{impersonationLevel=impersonate}$Server\\Root\\cimv2"; $WMI = Win32::OLE->GetObject( $CLASS ) || return print LOGFILE "Error on $Server: ", Win32::OLE

How to get remote logical drive letters

2004-10-19 Thread Ben Conrad
Folks, Is there a way to list the logical fixed disk drive letters on a -remote- machine? Requirements would be that all you have for script input is the machine name, the module would do the work of finding logical fixed disk letters. I looked at AdminMisc::GetDrives() and it only seems to list

RE: Simple threading has large handle leak (need help)

2004-10-01 Thread Ben Conrad
After compiling and testing on 5.8.5 this handle leak and memory usage issue has been resolved. Ben -Original Message- From: Ben Conrad [mailto:[EMAIL PROTECTED] Sent: Monday, September 13, 2004 11:52 AM To: Perl-Win32-Users Subject: Simple threading has large handle leak (need help

RE: How to compile 5.8.5 on Windows?

2004-10-01 Thread Ben Conrad
Message- From: Ben Conrad [mailto:[EMAIL PROTECTED] Sent: Tuesday, September 21, 2004 10:09 AM To: perl-win32-users Subject: How to compile 5.8.5 on Windows? Folks, I'm trying to compile the latest perl (5.8.5) for Win32. I'm having some issues with the proper steps to get this g

RE: AdminMisc::GetFileInfo gives different info than Windows expl orer

2004-09-30 Thread Ben Conrad
Thanks, I tried both and the output is similar. I found Win32::File::VersionInfo on CPAN, that is reporting the file versions correctly. Ben -Original Message- From: Steven Manross [mailto:[EMAIL PROTECTED] Sent: Wednesday, September 29, 2004 2:31 PM To: Ben Conrad; perl-win32-users

AdminMisc::GetFileInfo gives different info than Windows explorer

2004-09-29 Thread Ben Conrad
Folks, I'm writing a script to find gdiplus.dll files that may be vulnerable to the microsoft GDI+ bug. When I use: Win32::AdminMisc::GetFileInfo($filename, \%Info); print "- $Info{ProductVersion}\n"; -or- print "- $Info{FileVersion}\n"; I get version 5.1.3102.2180 But if I look at the file pr

Simple threading has large handle leak (need help)

2004-09-13 Thread Ben Conrad
the thread correctly, the tutorial says that $thr->join() will do all OS cleanup for the thread. Thanks, Ben Ben Conrad Sr. Network Administrator 180 Old Colony Avenue Quincy, MA 02170 Passkey International, Inc. [T] 617.237.8225 [M] 617.852.6206 [F] 617.328.1461 http://www.passkey.com *T

RE: PAR issue with Win32::AdminMisc module

2004-08-26 Thread Ben Conrad
That worked, thanks a lot. -Original Message- From: Jean-Louis Morel [mailto:[EMAIL PROTECTED] Sent: Thursday, August 26, 2004 8:53 AM To: Ben Conrad Cc: [EMAIL PROTECTED] Subject: Re: PAR issue with Win32::AdminMisc module Ben Conrad wrote: > Hello, > > I'm building a si