I have a Perl 5.10 PerlSvc program compiled using PDK 7.1 executing in a 32-bit Windows environment that does not leak. The same program when placed on two different x64 servers is exhibiting a memory leak condition.
Are any of modules listed below known to have issues in an x64 environment? package PerlSvc; use Config::IniHash; use File::Basename; use File::Path; use Getopt::Long; use MIME::Lite; use strict; use Win32::ChangeNotify; use Win32::OLE qw(in); This is the core of the program: $notify = Win32::ChangeNotify->new($Config->{sms}->{packagepath},1,'FILE_NAME'); while (ContinueRun()) { my $result = $notify->wait(3000); $notify->reset; if (defined $result) { #do stuff my $loc = Win32::OLE->CreateObject("WbemScripting.SWbemLocator"); ... $objPkgs = $objSMS->ExecQuery("select * from SMS_Package where PackageID = '" . $packageid . "'"); ... foreach my $objPkg (in $objPkgs) { $PackageName = $objPkg->{name}; $objPkg->RefreshPkgSource; } } } How should I approach this issue? Howard A. Bullock Tyco Electronics Computer Security _______________________________________________ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs