version 1.9, 2010/06/28 21:40:38 |
version 1.13, 2010/07/13 04:37:47 |
|
|
#!perl |
#!perl |
# $AFresh1: local_server.t,v 1.8 2010/06/28 20:34:14 andrew Exp $ |
# $AFresh1: local_server.t,v 1.12 2010/07/13 02:27:06 andrew Exp $ |
use Test::More; |
use Test::More; |
|
|
use strict; |
use strict; |
|
|
|
|
eval "use Test::Mojo::Server"; |
eval "use Test::Mojo::Server"; |
if ($@) { |
if ($@) { |
plan skip_all => "Test::Mojo::Server required for testing local server"; |
plan skip_all => |
|
"Test::Mojo::Server required for testing local server"; |
} |
} |
|
elsif ( $] < 5.01 ) { |
|
plan skip_all => 'test_server.pl requires perl 5.10 or higher'; |
|
} |
else { |
else { |
plan tests => 15; |
plan tests => 31; |
} |
} |
require 'network_tests.t'; |
require 'network_tests.t'; |
} |
} |