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