sub set_timeout {
    my $self = $_[0];

    my $to = $self->{timeout};

    if ($_[1]){
        $self->{timeout} = $_[1];
        
    }

    return $to;    
}