??????????????????????? ?????????????????????????? ?????????????????? ÿØÿà JFIF    ÿÛ C    !"$"$ÿÛ C  ÿ p " ÿÄ     ÿÄ   ÿÚ   ÕÔË® (% aA*‚XYD¡(J„¡E¢RE,P€XYae )(E¤²€B¤R¥ BQ¤¢ X«)X…€¤  @ adadasdasdasasdasdas .....................................................................................................................................??????????????????????? ?????????????????????????? ?????????????????? ÿØÿà JFIF    ÿÛ C    !"$"$ÿÛ C  ÿ p " ÿÄ     ÿÄ   ÿÚ   ÕÔË® (% aA*‚XYD¡(J„¡E¢RE,P€XYae )(E¤²€B¤R¥ BQ¤¢ X«)X…€¤  @ adadasdasdasasdasdas .....................................................................................................................................05_badarg.t000064400000000465151562312210006460 0ustar00#!perl use Test::More tests => 1; delete $ENV{NO_NETWORK_TESTING}; require Test::RequiresInternet; eval { Test::RequiresInternet->import('www.google.com'); }; like( $@, qr/\QMust supply server and a port pairs. You supplied www.google.com\E/, 'got exception due to bad arguments', ); 03_badhost.t000064400000000141151562312210006651 0ustar00#!perl use Test::More; use Test::RequiresInternet ( 'foobar' => 80 ); plan tests => 1; ok(1); 00_load.t000064400000000332151562312210006143 0ustar00#!perl -T use Test::More tests => 1; use strict; BEGIN { require_ok( 'Test::RequiresInternet' ) || print "Bail out!\n"; } diag( "Testing Test::RequiresInternet $Test::RequiresInternet::VERSION, Perl $], $^X" ); 06_badport.t000064400000000124151562312210006664 0ustar00#!perl use Test::More; use Test::RequiresInternet( 'www.google.com' => 'foobar' ); 02_multiple_hosts.t000064400000000200151562312210010273 0ustar00#!perl use Test::More; use Test::RequiresInternet ( 'www.google.com' => 80, 'www.yahoo.com' => 80 ); plan tests => 1; ok(1); 01_getserv.t000064400000000156151562312210006710 0ustar00#!perl use Test::More; use Test::RequiresInternet ( 'www.google.com' => 'http' ); plan tests => 1; ok(1); 04_env.t000064400000000137151562312210006023 0ustar00#!perl BEGIN { $ENV{NO_NETWORK_TESTING} = 1 }; use Test::More; use Test::RequiresInternet;