perl -MNet::SSLeay -le 'print Net::SSLeay::SSL_alert_desc_string_long(1)'