Debian lenny version packages
[pkg-perl] / deb-src / libio-compress-zlib-perl / libio-compress-zlib-perl-2.012 / t / 109merge-zip.t
1 BEGIN {
2     if ($ENV{PERL_CORE}) {
3         chdir 't' if -d 't';
4         @INC = ("../lib", "lib/compress");
5     }
6 }
7
8 use lib qw(t t/compress);
9 use strict;
10 use warnings;
11
12 use Test::More skip_all => "not implemented yet";
13
14
15 use IO::Compress::Zip     qw($ZipError) ;
16 use IO::Uncompress::Unzip qw($UnzipError) ;
17
18 sub identify
19 {
20     'IO::Compress::Zip';
21 }
22
23 require "merge.pl" ;
24 run();