Besides the use strict() error noted by keszler that also reveals a $pass/$password missmatch, it seems that your installation of Net::SSH::Perl is broken.