my $ssh = Net::SSH::Any->new($ipAddr, 
  user => $user, 
  password => $password, 
  backends => [qw/Net::SSH2/], 
  timeout=>1, 
  kill_ssh_on_timeout=>1);
  $ssh->error and 
   die "Unable to Connect via SSH to $mac, " . $ssh->error);
  my ($output, $errput) = $ssh->capture2($cmd);