X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=t%2Fget-netssleay.t;h=9ca788f8229ae02406a84f2ce8a3e4e4f485f50f;hb=a39c911f8c4def7e6f57b1c2349642bd58696742;hp=9c83a0f9f3021f3b100728044af40fd18b08703f;hpb=97e89d11919d233afc4bbe3a2c7f14a4d116584b;p=Net-HTTPS-Any.git diff --git a/t/get-netssleay.t b/t/get-netssleay.t index 9c83a0f..9ca788f 100644 --- a/t/get-netssleay.t +++ b/t/get-netssleay.t @@ -4,33 +4,36 @@ use strict; use warnings; use Test::More; -plan( tests=>4 ); - -use_ok 'Net::HTTPS::Any'; +BEGIN { + plan( tests=>4 ); + use_ok( 'Net::HTTPS::Any', qw( https_get ) ); +} #200 -my($content, $response, %headers) = Net::HTTPS::Any::https_get( - { 'host' => 'secure.sisd.com', +my($content, $response, %headers) = https_get( + { 'host' => 'www.fortify.net', 'port' => 443, - 'path' => '/freeside/index.html', + 'path' => '/sslcheck.html', }, 'net_https_any_test' => 1, ); -like($response, qr/^HTTP\/[\d\.]+\s+200/i, 'Received 200 (OK) response'); +#like($response, qr/^HTTP\/[\d\.]+\s+200/i, 'Received 200 (OK) response'); +like($response, qr/^200/i, 'Received 200 (OK) response'); ok( length($content), 'Received content' ); #404 -my($content2, $response2, %headers2) = Net::HTTPS::Any::https_get( - { 'host' => 'secure.sisd.com', +my($content2, $response2, %headers2) = https_get( + { 'host' => 'www.fortify.net', 'port' => 443, - 'path' => '/freeside/notfound.html', + 'path' => '/notfound.html', }, 'net_https_any_test' => 1, ); -like($response2, qr/^HTTP\/[\d\.]+\s+404/i, 'Received 404 (OK) response'); +#like($response2, qr/^HTTP\/[\d\.]+\s+404/i, 'Received 404 (Not Found) response'); +like($response2, qr/^404/i, 'Received 404 (Not Found) response');