Perl
Perl
SFTP Host Key Fingerprint
See more SFTP Examples
Demonstrates how to get the SSH server's host key fingerprint after connecting.Chilkat Perl Downloads
use chilkat();
$success = 0;
# This example assumes the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.
$sftp = chilkat::CkSFtp->new();
$hostname = "sftp.example.com";
$port = 22;
$success = $sftp->Connect($hostname,$port);
if ($success != 1) {
print $sftp->lastErrorText() . "\r\n";
exit;
}
# Get the classic MD5 fingeprint
$md5_fingerprint = $sftp->hostKeyFingerprint();
print $md5_fingerprint . "\r\n";
# Sample output:
# ssh-rsa 3072 21:b0:d8:41:4e:ef:78:10:20:af:01:b7:71:5d:eb:94
# Starting in Chilkat v9.5.0.92, we can also get the SHA256 fingerprint.
# (it is also possible to get fingerprints using other hash algorithms such as SHA384, SHA512, etc.)
$includeKeyType = 1;
$includeHashName = 1;
$sha256_fingerprint = $sftp->getHostKeyFP("SHA256",$includeKeyType,$includeHashName);
print $sha256_fingerprint . "\r\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 . "\r\n";
# SHA256:Ufgj480OsdsCZRjj9sSNM6fpgIcSJ61RsIG8usndUIY=
$includeKeyType = 1;
$includeHashName = 0;
$sha256_fingerprint = $sftp->getHostKeyFP("SHA256",$includeKeyType,$includeHashName);
print $sha256_fingerprint . "\r\n";
# ssh-rsa Ufgj480OsdsCZRjj9sSNM6fpgIcSJ61RsIG8usndUIY=
$includeKeyType = 0;
$includeHashName = 0;
$sha256_fingerprint = $sftp->getHostKeyFP("SHA256",$includeKeyType,$includeHashName);
print $sha256_fingerprint . "\r\n";
# Ufgj480OsdsCZRjj9sSNM6fpgIcSJ61RsIG8usndUIY=