X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/d730472d2f8260c653bf526679c7046f7f4865fe..8d8193d7ef96b974dc88a95c24407fb70c3b5501:/ext/PerlIO-encoding/t/fallback.t?ds=sidebyside diff --git a/ext/PerlIO-encoding/t/fallback.t b/ext/PerlIO-encoding/t/fallback.t index 5842081..efa3988 100644 --- a/ext/PerlIO-encoding/t/fallback.t +++ b/ext/PerlIO-encoding/t/fallback.t @@ -1,11 +1,10 @@ #!./perl BEGIN { - chdir 't' if -d 't'; - @INC = '../lib'; - push @INC, "::lib:$MacPerl::Architecture:" if $^O eq 'MacOS'; - require "../t/test.pl"; - skip_all("No perlio") unless (find PerlIO::Layer 'perlio'); + unless (find PerlIO::Layer 'perlio') { + print "1..0 # No perlio\n"; + exit 0; + } if (ord("A") == 193) { print "1..0 # Skip: EBCDIC\n"; exit 0; @@ -14,7 +13,7 @@ BEGIN { print "1..0 # Skip: No Encode\n"; exit 0; } - plan (9); + use Test::More tests => 9; import Encode qw(:fallback_all); }