Duplicate Perl Processes

Hi

Has anyone come across a scenario where Perl processes duplicate themselves?

I am running ActivePerl version 5.8.8 Build 822 on a windows 2003 server. I
have 19 Perl processes running in an infinite loop - they run in their own
command windows rather than as services.

At the time when they replicated themselves there is an event in the
application event log:

Event Type: Information
Event Source: Application Error
Event Category: (100)
Event ID: 1004
Date: 06/08/2008
Time: 09:37:08
User: N/A
Computer: GBCMS1
Description:
Reporting queued error: faulting application perl.exe, version 5.8.8.822,
faulting module ntdll.dll, version 5.2.3790.3959, fault address 0x00058030.

For more information, see Help and Support Center at
http://go.microsoft.com/fwlink/events.asp.
Data:
0000: 41 70 70 6c 69 63 61 74 Applicat
0008: 69 6f 6e 20 46 61 69 6c ion Fail
0010: 75 72 65 20 20 70 65 72 ure per
0018: 6c 2e 65 78 65 20 35 2e l.exe 5.
0020: 38 2e 38 2e 38 32 32 20 8.8.822
0028: 69 6e 20 6e 74 64 6c 6c in ntdll
0030: 2e 64 6c 6c 20 35 2e 32 .dll 5.2
0038: 2e 33 37 39 30 2e 33 39 .3790.39
0040: 35 39 20 61 74 20 6f 66 59 at of
0048: 66 73 65 74 20 30 30 30 fset 000
0050: 35 38 30 33 30 58030


I have been running a similar setup for many years and not seen this - one
thing that has changed relatively recently is I am using the
Log::Dispatch::File::Rolling module for Log4perl (although this has been
running for many months with no issues).

Any ideas on what may have happened or how to isolate this?

Regards
Mark

_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Win32::FileSecurity

Hi,

Has anyone come across an issue with the Win32::FileSecurity module, that
ships with Perl 10, that causes it to croak when trying to retrieve DACL for
a folder for which one of the trustees is an unknown account (i.e account is
represented by it's SID instead of the account name)?

This doesn't appear to be an issue with the Win32::FileSecurity module from
Dave Roth. Unfortunately, Dave Roth's module will only work with Perl 817
and below.

The specific code extract I'm using is:

use Win32::FileSecurity qw(Get EnumerateRights);
...
Get($folder,\%htrustees);
while (($trustee, $mask) = each %htrustees) {
...

The script croaks when it calls the Get function, and the error can not be
trapped. I have tried "eval" to no avail.

Any ideas, other than going back to 817, will be greatly appreciated.

Thanks
Charles


_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs