Hello @hirose31!
Thank you for all of your work on this library. I'm using it in https://www.prettygoodping.com/
I got a recent report of a host with a valid SSL cert for which an expiration date cannot be found. I did some poking around, but I'm out of my depth here. I did add a Data::Printer statement, which you can see in my output below, which is my failing test case.
#!perl
use v5.20;
use Net::SSL::ExpireDate ();
use Test::More;
my $ed = Net::SSL::ExpireDate->new( https => 'orhagen.no' );
ok( $ed->expire_date );
done_testing();
Output:
$ prove t/integration.t
t/integration.t .. Printing in line 196 of /Users/olaf/Documents/github/hirose31/Net-SSL-ExpireDate/lib/Net/SSL/ExpireDate.pm:
{
data => 'F',
length => 2,
read => 0,
type => 21,
version => 769,
}
record type is SSL3_AL_FATAL. [desctioption: 70] at t/integration.t line 9.
not ok 1
# Failed test at t/integration.t line 9.
1..1
# Looks like you failed 1 test of 1.
Dubious, test returned 1 (wstat 256, 0x100)
Failed 1/1 subtests
Test Summary Report
-------------------
t/integration.t (Wstat: 256 (exited 1) Tests: 1 Failed: 1)
Failed test: 1
Non-zero exit status: 1
Files=1, Tests=1, 1 wallclock secs ( 0.02 usr 0.00 sys + 0.21 cusr 0.03 csys = 0.26 CPU)
Result: FAIL
Hello @hirose31!
Thank you for all of your work on this library. I'm using it in https://www.prettygoodping.com/
I got a recent report of a host with a valid SSL cert for which an expiration date cannot be found. I did some poking around, but I'm out of my depth here. I did add a
Data::Printerstatement, which you can see in my output below, which is my failing test case.Output: