Perl

SSH Host Key Fingerprint

See more SSH Examples

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

use chilkat();

$success = 0;

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

$ssh = chilkat::CkSsh->new();

$hostname = "ssh.example.com";
$port = 22;
$success = $ssh->Connect($hostname,$port);
if ($success != 1) {
    print $ssh->lastErrorText() . "\r\n";
    exit;
}

# Get the classic MD5 fingeprint
$md5_fingerprint = $ssh->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 = $ssh->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 = $ssh->getHostKeyFP("SHA256",$includeKeyType,$includeHashName);
print $sha256_fingerprint . "\r\n";

# SHA256:Ufgj480OsdsCZRjj9sSNM6fpgIcSJ61RsIG8usndUIY=

$includeKeyType = 1;
$includeHashName = 0;
$sha256_fingerprint = $ssh->getHostKeyFP("SHA256",$includeKeyType,$includeHashName);
print $sha256_fingerprint . "\r\n";

# ssh-rsa Ufgj480OsdsCZRjj9sSNM6fpgIcSJ61RsIG8usndUIY=

$includeKeyType = 0;
$includeHashName = 0;
$sha256_fingerprint = $ssh->getHostKeyFP("SHA256",$includeKeyType,$includeHashName);
print $sha256_fingerprint . "\r\n";

# Ufgj480OsdsCZRjj9sSNM6fpgIcSJ61RsIG8usndUIY=