Help for this page

Select Code to Download

Select or download this
```
for( my $p = 0; ...)
```

Select or download this

sub processit {
    my( $lclient, $lfileno, $lpeer ) = @_;
...
    #### Will cause problems.
    @clients = grep{ $_ !~ $lfileno } @clients;
}