Help for this page
if( $sock->send( <rRE> ) ) { push @{ $timeouts{ int( time() ) + 10 ) }, $sock; ... else { ## handle send failures }
... for my $sock ( @{ $timeouts{ int( time() ) { ... $poll->remove( $sock ); ## log failure. }