Re: SEGV signal termination in Win32::NetAdmin ver 0.12 on Win64 w ActiveStatePerl5.16.3 X64

[ww]

Are you sure you've given us all relevant code and messages?

When I execute what you gave us, under 32 bit Win7, AS 5.16.3, with the original install (v = .11) of Win32::NetAdmin, I see:

Reference found where even-sized list expected at D:\_wo_sch\1080998.pl line 4.

That's as expected; if you delete the " = {}" so line 4 becomes "my %UserList;", you may have better success (emphasis on the "may", as I'm not playing with 64 bit 'doze.

[suzun30]

Hi,

Thanks for your response. I corrected that to (). It was a mistake while trying to simplify the code for display here. But essentially that's the code. I am looking for any inputs on the SEGV issue. Please let me know if you have any pointers on that subject.

Thanks,

[bulk88]

SEGVs dont really happen on Win32 (excluding Cygwin). They are called Exceptions with error code 0xC0000005 and perl signals can not catch them. Therefore "Signal SEGV at C:/Perl64/lib/perl5db.pl line 7597 , <INFILE> line 23. DB::diesignal('SEGV')called at GetLocalAdmins.pl " is manually generated. Therefore, there is code you are not showing us. There is no line 23 in your script and no <> operator. I see only upto line 14. The line 7597 in your script is http://perl5.git.perl.org/perl.git/blob/25fdf527591b902c99f699bb9d51d4f6ce49a6fc:/lib/perl5db.pl#l8503 in git perl. The line in ActivePerl is

        # Tell us all about it.
        &warn( Carp::longmess("Signal @_") );

, not _db_warn. Something called $signalLevel, to allow diesignal to run and nothing uses http://grep.cpan.me/?q=signalLevel on CPAN, so its your code.