Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

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

by ww (Bishop)
on Apr 04, 2014 at 00:13 UTC ( #1081046=note: print w/ replies, xml ) Need Help??


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

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.


Questions containing the words "doesn't work" (or their moral equivalent) will usually get a downvote from me unless accompanied by:
  1. code
  2. verbatim error and/or warning messages
  3. a coherent explanation of what "doesn't work actually means.


Comment on Re: SEGV signal termination in Win32::NetAdmin ver 0.12 on Win64 w ActiveStatePerl5.16.3 X64
Select or Download Code
Re^2: SEGV signal termination in Win32::NetAdmin ver 0.12 on Win64 w ActiveStatePerl5.16.3 X64
by suzun30 (Acolyte) on Apr 14, 2014 at 22:15 UTC
    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,
      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.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1081046]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (5)
As of 2014-12-27 12:23 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (177 votes), past polls