Select Code to Download

sub _connect {
    my ($self, $async) = @_;
...

    my $timeout = int((($self->{_timeout} || 90) + 2)/3);
...