NAME

 Net::SSL::GetServerProperties - get properties from SSL/TLS servers

VERSION

SYNOPSIS

   my $prop = Net::SSL::GetServerProperties->new( host => $host, );
   $prop->get_properties;
   
   say "Supported Cipher Suites at Host $host: " . $prop->accepted_ciphers->names;
   say "Supports SSLv2"   if $prop->supports_sslv2;
   say "Supports SSLv3"   if $prop->supports_sslv3;
   say "Supports TLSv1"   if $prop->supports_tlsv1;
   say "Supports TLSv1.1" if $prop->supports_tlsv11;
   say "Supports TLSv1.2" if $prop->supports_tlsv12;

   say "Supports at least one Bettercrypto A Cipher Suite"             if $prop->supports_any_bc_a;
   say "Supports at least one Bettercrypto B Cipher Suite"             if $prop->supports_any_bc_b;
   say "Supports at least one BSI TR-02102-2 Cipher Suite with PFS"    if $prop->supports_any_bsi_pfs;
   say "Supports at least one BSI TR-02102-2 Cipher Suite without PFS" if $prop->supports_any_bsi_nopfs;

   say "Supports only Bettercrypto A Cipher Suites"             if $prop->supports_any_bc_a;
   say "Supports only Bettercrypto B Cipher Suites"             if $prop->supports_any_bc_b;
   say "Supports only BSI TR-02102-2 Cipher Suites with PFS"    if $prop->supports_any_bsi_pfs;
   say "Supports only BSI TR-02102-2 Cipher Suites without PFS" if $prop->supports_any_bsi_nopfs;

   say "Supports weak Cipher Suites"                                    if $prop->supports_weak;
   say "Supports medium Cipher Suites"                                  if $prop->supports_medium;
   say "Supports no weak or medium Cipher Suites, only high or unknown" if $prop->supports_no_weakmedium;
   say "Supports ancient SSL Versions 2.0 or 3.0"                       if $prop->supports_ancient_ssl_versions;

   say "Cipher Suite used by Firefox:        " . $prop->firefox_cipher;
   say "Cipher Suite used by Safari:         " . $prop->safari_cipher;
   say "Cipher Suite used by Chrome:         " . $prop->chrome_cipher;
   say "Cipher Suite used by Win 7 (IE 8):   " . $prop->ie8win7_cipher;
   say "Cipher Suite used by Win 10 (IE 11): " . $prop->ie11win10_cipher;
   
   say "Supports only SSL/TLS versions recommended by BSI TR-02102-2"                            if $prop->supports_only_bsi_versions;
   say "Supports only SSL/TLS versions and cipher suites with PFS recommended by BSI TR-02102-2" if $prop->supports_only_bsi_versions_ciphers;
   say "Supports only TLS 1.2 "                                                                  if $prop->supports_only_tlsv12;
   
   # supports_sslv3_or_newer, supports_tlsv1_or_newer, supports_tlsv11_or_newer, supports_tlsv12_or_newer
   # supports_max_tls11, supports_max_tlsv1, supports_max_sslv3, supports_only_sslv2
   
   
   say "Ciphersuites used:";
   say "  * $_->{name}" foreach @{ $prop->accepted_ciphers }
   
   say "Overall Score for this Host: " . $prop->score;


   # or: use it with method delegation

DESCRIPTION