1*b39c5158SmillertBEGIN { 2*b39c5158Smillert if ($ENV{PERL_CORE}) { 3*b39c5158Smillert chdir 't' if -d 't'; 4*b39c5158Smillert @INC = ("../lib", "lib/compress"); 5*b39c5158Smillert } 6*b39c5158Smillert} 7*b39c5158Smillert 8*b39c5158Smillertuse lib qw(t t/compress); 9*b39c5158Smillertuse Test::More; 10*b39c5158Smillert 11*b39c5158Smillerteval "use Test::Pod 1.00"; 12*b39c5158Smillert 13*b39c5158Smillertplan skip_all => "Test::Pod 1.00 required for testing POD" if $@; 14*b39c5158Smillert 15*b39c5158Smillertall_pod_files_ok(); 16*b39c5158Smillert 17