Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
    close $child;
}
__END__

Select or download this

$ telnet localhost 5000
Trying 127.0.0.1...
...
You send: Hello!
Connection closed by foreign host.
$