diff options
Diffstat (limited to 't/get-cryptssleay.t')
| -rw-r--r-- | t/get-cryptssleay.t | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/t/get-cryptssleay.t b/t/get-cryptssleay.t index 2b3babe..920f50a 100644 --- a/t/get-cryptssleay.t +++ b/t/get-cryptssleay.t @@ -5,17 +5,15 @@ use warnings; use Test::More; BEGIN { + plan( tests=>4 ); $Business::OnlinePayment::HTTPS::skip_NetSSLeay=1; $Business::OnlinePayment::HTTPS::skip_NetSSLeay=1; -} - -plan( tests=>4 ); - -use_ok 'Net::HTTPS::Any'; + use_ok 'Net::HTTPS::Any', 'https_get'; +}; #200 -my($content, $response, %headers) = Net::HTTPS::Any::https_get( +my($content, $response, %headers) = https_get( { 'host' => 'secure.sisd.com', 'port' => 443, 'path' => '/freeside/index.html', @@ -29,7 +27,7 @@ ok( length($content), 'Received content' ); #404 -my($content2, $response2, %headers2) = Net::HTTPS::Any::https_get( +my($content2, $response2, %headers2) = https_get( { 'host' => 'secure.sisd.com', 'port' => 443, 'path' => '/freeside/notfound.html', |