Help for this page

Select Code to Download


  1. or download this
    my @readable = $s->can_read(1);
for my $fh (@readable) {
...

    ...
}
  2. or download this
    use List::Util qw( first );

...

    ...
}
  3. or download this
    my @readable = $s->can_read(1);
for my $fh (@readable) {
...

    ...
}
  4. or download this
    use List::Util qw( first );

...

    ...
}