Perl Requires Chilkat v9.5.0.92+

SFTP Host Key Fingerprint

See more SFTP Examples

Demonstrates how to get the SSH server's host key fingerprint after connecting. Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

# This example assumes the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

my $sftp = Chilkat2::SFtp->new;

my $hostname = 'sftp.example.com';
my $port = 22;
my $success = $sftp->Connect($hostname, $port);
if (!$success) {
    print $sftp->LastErrorText, "\n";
    exit;
}

# Get the classic MD5 fingeprint
my $md5_fingerprint = $sftp->HostKeyFingerprint;
print $md5_fingerprint, "\n";

# Sample output:
# ssh-rsa 3072 21:b0:d8:41:4e:ef:78:10:20:af:01:b7:71:5d:eb:94

# We can also get the SHA256 fingerprint.
# (it is also possible to get fingerprints using other hash algorithms such as SHA384, SHA512, etc.)

my $includeKeyType = 1;
my $includeHashName = 1;
my $sha256_fingerprint = $sftp->GetHostKeyFP('SHA256', $includeKeyType, $includeHashName);
print $sha256_fingerprint, "\n";

# Sample output:
# ssh-rsa SHA256:Ufgj480OsdsCZRjj9sSNM6fpgIcSJ61RsIG8usndUIY=

# The key type and hash name can be optionally included or not.
$includeKeyType = 0;
$includeHashName = 1;
$sha256_fingerprint = $sftp->GetHostKeyFP('SHA256', $includeKeyType, $includeHashName);
print $sha256_fingerprint, "\n";

# SHA256:Ufgj480OsdsCZRjj9sSNM6fpgIcSJ61RsIG8usndUIY=

$includeKeyType = 1;
$includeHashName = 0;
$sha256_fingerprint = $sftp->GetHostKeyFP('SHA256', $includeKeyType, $includeHashName);
print $sha256_fingerprint, "\n";

# ssh-rsa Ufgj480OsdsCZRjj9sSNM6fpgIcSJ61RsIG8usndUIY=

$includeKeyType = 0;
$includeHashName = 0;
$sha256_fingerprint = $sftp->GetHostKeyFP('SHA256', $includeKeyType, $includeHashName);
print $sha256_fingerprint, "\n";

# Ufgj480OsdsCZRjj9sSNM6fpgIcSJ61RsIG8usndUIY=