Help for this page
my $agent = Net::SSH::Perl::Agent->new(1); # ~
my $agent = Net::SSH::Perl::Agent->new(2); # ~