use strict;
use warnings;
-BEGIN {
- if ($ENV{'PERL_CORE'}){
- chdir 't';
- unshift @INC, '../lib';
- }
-}
-
use Test::More (tests => 53);
### Start of Testing ###
ok((require threads::shared),"Require module");
-if ($threads::shared::VERSION && ! exists($ENV{'PERL_CORE'})) {
+if ($threads::shared::VERSION && ! $ENV{'PERL_CORE'}) {
diag('Testing threads::shared ' . $threads::shared::VERSION);
}