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