Did you try to do that from the command line?

Try Net::SSH2 or Net::SSH::Perl which will let you pass username/pass