💾 Archived View for thrig.me › tech › ssl › certid.pl captured on 2023-04-19 at 23:41:47.
-=-=-=-=-=-=-
#!/usr/bin/env perl use 5.12.0; use warnings; use Net::SSLeay; my $bio = Net::SSLeay::BIO_new_file( shift, 'r' ); my $cert = Net::SSLeay::PEM_read_bio_X509($bio); say Net::SSLeay::X509_get_fingerprint( $cert, 'sha256' );