Help for this page

Select Code to Download

Select or download this

while(@ready = $sel->can_read)
#...
    $line = <$fh>;