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
12use IO::Uncompress::AnyInflate qw($AnyInflateError) ;
13use IO::Compress::RawDeflate   qw($RawDeflateError) ;
14use IO::Uncompress::RawInflate qw($RawInflateError) ;
15
16sub getClass
17{
18    'AnyInflate';
19}
20
21
22sub identify
23{
24    'IO::Compress::RawDeflate';
25}
26
27require "any.pl" ;
28run();
29