Help for this page

Select Code to Download


  1. or download this
    ...
# This message is print, so I do get here!
...
    $line = <SOCK>;
    print "\nGot1: ", $line;
...
  2. or download this
    ...
$SIG{CHLD} = \&REAPER;
...
 my($port,$iaddr) = sockaddr_in($paddr);
 my $name = gethostbyaddr($iaddr,AF_INET);
...