Help for this page

Select Code to Download

Select or download this

use IO::Select;

...
else {
   # timeout.
}