use autouse 'Net::SSH::Perl' => 'Net::SSH::Perl::new'; my $ssh = Net::SSH::Perl->new;