Help for this page

Select Code to Download


  1. or download this
    Before setting SIG{CHLD} its value is...<br/>
    $VAR1 = undef;<br/>
    ...
    Reading ping stream...<br/>
    Reading ping stream...<br/>
    DONE
    
  2. or download this
    Before setting SIG{CHLD} its value is...<br/>
    $VAR1 = undef;<br/>
    ...
    Reading ping stream...<br/>
    Use of uninitialized value in iteration finalizer at mytest.pl line 21
    +, <PING> line 1.<br/>
    Unable to create sub named "" at mytest.pl line 21, <PING> line 1.</p>
    
  3. or download this
    use strict;
    use warnings;
    ...
    sub REAPER {
        print "I AM A SIG{CHLD} handler\n"
    }
    
  4. or download this
    package Error::Test;
    
    ...
    my $resolver = new Net::DNS::Resolver();
    
    1;