diff options
| author | ivan <ivan> | 2008-06-16 18:32:54 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2008-06-16 18:32:54 +0000 |
| commit | 11c117de3d421d0b9843f6fdfeea3933c3d47fe5 (patch) | |
| tree | 824d09ddcdb82070b224ac85d191cf610dc2ad58 /t/get-netssleay.t | |
| parent | 97e89d11919d233afc4bbe3a2c7f14a4d116584b (diff) | |
add debugging, properly export subs
Diffstat (limited to 't/get-netssleay.t')
| -rw-r--r-- | t/get-netssleay.t | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/t/get-netssleay.t b/t/get-netssleay.t index 9c83a0f..d36111d 100644 --- a/t/get-netssleay.t +++ b/t/get-netssleay.t @@ -4,13 +4,14 @@ 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( +my($content, $response, %headers) = https_get( { 'host' => 'secure.sisd.com', 'port' => 443, 'path' => '/freeside/index.html', @@ -24,7 +25,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', |