Re: Mysterious script crash in win2k and ActivePerl


Pathologically Eclectic Rubbish Lister
	PerlMonks

Re: Mysterious script crash in win2k and ActivePerl

by ibanix (Hermit)

on Dec 13, 2002 at 16:28 UTC ( [id://219625]=note: print w/replies, xml )

Need Help??

in reply to Mysterious script crash in win2k and ActivePerl

Hi john,

For starters, do you have strict and warnings enabled? You should always be using those.

If you could post some code (always the best thing to do!) then we might be able to help more. Also, why not output your debug statements to a file, so you can read what happens just before it crashes?

Cheers,
ibanix

$ echo '$0 & $0 &' > foo; chmod a+x foo; foo;

Comment on Re: Mysterious script crash in win2k and ActivePerl Download Code

Replies are listed 'Best First'.

Re: Re: Mysterious script crash in win2k and ActivePerl
by jhanna (Scribe) on Dec 13, 2002 at 16:53 UTC

I did find one bug and corrected it this way:

    while($buf=~/(.*\n)/g) {
     print DEBUG  "doing <$1>\n";
     ${$Con{$fh}}{getline}($fh,$1);
     last unless $Con{$fh};  # it's possible that the connection can b
+e deleted while there's still something in the buffer
    }
    if($Con{$fh}) {
     ($this->{_})=$buf=~/([^\n\r]*)$/s;
     if(length($this->{_}) > 10000) {
      ${$Con{$fh}}{getline}($fh,$this->{_});
      ($this->{_})='';
     }
    }
[download]

john

[reply]
[d/l]

In Section Seekers of Perl Wisdom