my $ssh = Net::OpenSSH->new($host,
                            user => $user,
                            master_opts => ['-vvv'],
                            key_path= $private_key_path,
                            default_ssh_opts=>[-o =>'Port=24']

);
$ssh->error and
  die "Couldn't establish SSH connection: ". $ssh->error;