Help for this page

Select Code to Download

Select or download this

my @readable = $read->can_read;
foreach $fh (@readable) {
   ...
}