The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more
|
BEGIN {
if ( $ENV {PERL_CORE}) {
chdir 't' if -d 't' ;
@INC = ( "../lib" , "lib/compress" );
}
}
sub getClass
{
'AnyUncompress' ;
}
sub identify
{
'IO::Compress::Zip' ;
}
require "any.pl" ;
run();
|