Help for this page

Select Code to Download


  1. or download this
    while ( sysread(STDIN, $buf, 1024) ) || ( @ready = $sel->can_read() )