xref: /openbsd-src/gnu/usr.bin/perl/cpan/IO-Compress/t/002any-deflate.t (revision b39c515898423c8d899e35282f4b395f7cad3298)
1BEGIN {
2    if ($ENV{PERL_CORE}) {
3	chdir 't' if -d 't';
4	@INC = ("../lib", "lib/compress");
5    }
6}
7
8use lib qw(t t/compress);
9use strict;
10use warnings;
11
12
13use IO::Uncompress::AnyInflate qw($AnyInflateError) ;
14
15use IO::Compress::Deflate   qw($DeflateError) ;
16use IO::Uncompress::Inflate qw($InflateError) ;
17
18sub getClass
19{
20    'AnyInflate';
21}
22
23sub identify
24{
25    'IO::Compress::Deflate';
26}
27
28require "any.pl" ;
29run();
30