local $SIG{ALRM} = sub { die 'timed out' };

##</code><code>##

Timeout  => $connect_timeout,