X-Git-Url: http://git.maemo.org/git/?p=dh-make-perl;a=blobdiff_plain;f=dev%2Fi386%2Flibcompress-raw-zlib-perl%2Flibcompress-raw-zlib-perl-2.012%2Ft%2F000prereq.t;fp=dev%2Fi386%2Flibcompress-raw-zlib-perl%2Flibcompress-raw-zlib-perl-2.012%2Ft%2F000prereq.t;h=2552e4ed6bf5f774f400a4aa84dc2d8b7012b2e3;hp=0000000000000000000000000000000000000000;hb=8977e561d8a9eae6959218b0306c9df2056a38a9;hpb=df794b845212301ea0d267c919232538bfef356a diff --git a/dev/i386/libcompress-raw-zlib-perl/libcompress-raw-zlib-perl-2.012/t/000prereq.t b/dev/i386/libcompress-raw-zlib-perl/libcompress-raw-zlib-perl-2.012/t/000prereq.t new file mode 100644 index 0000000..2552e4e --- /dev/null +++ b/dev/i386/libcompress-raw-zlib-perl/libcompress-raw-zlib-perl-2.012/t/000prereq.t @@ -0,0 +1,57 @@ +BEGIN { + if ($ENV{PERL_CORE}) { + chdir 't' if -d 't'; + @INC = ("../lib", "lib/compress"); + } +} + +use lib qw(t t/compress); +use strict ; +use warnings ; + +use Test::More ; + +BEGIN +{ + # use Test::NoWarnings, if available + my $extra = 0 ; + $extra = 1 + if eval { require Test::NoWarnings ; import Test::NoWarnings; 1 }; + + + my $VERSION = '2.012'; + my @NAMES = qw( + + ); + + my @OPT = qw( + + ); + + plan tests => 1 + @NAMES + @OPT + $extra ; + + ok 1; + + foreach my $name (@NAMES) + { + use_ok($name, $VERSION); + } + + + foreach my $name (@OPT) + { + eval " require $name " ; + if ($@) + { + ok 1, "$name not available" + } + else + { + my $ver = eval("\$${name}::VERSION"); + is $ver, $VERSION, "$name version should be $VERSION" + or diag "$name version is $ver, need $VERSION" ; + } + } + +} +