Standardise t/uni/*.t on ./test.pl, and remove PERL_CORE boilerplate.
[p5sagit/p5-mst-13.2.git] / t / uni / chr.t
index ab710d9..8d7924f 100644 (file)
@@ -1,9 +1,6 @@
+#!./perl -w
 
 BEGIN {
-    if ($ENV{'PERL_CORE'}){
-        chdir 't';
-        @INC = '../lib';
-    }
     require Config; import Config;
     if ($Config{'extensions'} !~ /\bEncode\b/) {
       print "1..0 # Skip: Encode was not built\n";
@@ -22,12 +19,12 @@ BEGIN {
         exit 0;
     }
     $| = 1;
+
+    require './test.pl';
 }
 
 use strict;
-use Test::More tests => 6;
-use Encode;
-
+plan (tests => 6);
 use encoding 'johab';
 
 ok(chr(0x7f) eq "\x7f");