use strict; use warnings; use 5.010; require Net::SSH2; my %opts = ( debug => 1, trace => -1, ); say "Perl $^V;"; say Net::SSH2->version(); my $ssh2 = Net::SSH2->new(%opts); $ssh2->connect('meinserver.tld') or die join(' / ',$ssh2->error);