Help for this page

Select Code to Download


  1. or download this
    ...
while( my @ready = $client->can_read ) {
    warn "Inside";
    for my $fh (@ready) {
...
  2. or download this
    -bash-2.05b$ ./teletype.pl 
Inside at ./teletype.pl line 13.
...

^C
-bash-2.05b$
  3. or download this
    Inside at ./teletype.pl line 13.
aInside at ./teletype.pl line 13.
aInside at ./teletype.pl line 13.
aInside at ./teletype.pl line 13.
Inside at ./teletype.pl line 13.