Drop all the unnecessary "use utf8" clauses and some of

[p5sagit/p5-mst-13.2.git] / t / op / concat.t

diff --git a/t/op/concat.t b/t/op/concat.t
index 76074e0..5ae7da5 100644 (file)
--- a/t/op/concat.t
+++ b/t/op/concat.t
@@ -28,7 +28,6 @@ my $test = 4;
     $_ = $dx = "\x{10f2}";
     s/($dx)/$dx$1/;
     {
-       use bytes;
        print "not " unless $_ eq "$dx$dx";
        print "ok $test\n";
        $test++;
@@ -37,7 +36,6 @@ my $test = 4;
     $_ = $dx = "\x{10f2}";
     s/($dx)/$1$dx/;
     {
-       use bytes;
        print "not " unless $_ eq "$dx$dx";
        print "ok $test\n";
        $test++;
@@ -47,7 +45,6 @@ my $test = 4;
     $_  = "\x{10f2}\x{10f2}";
     s/($dx)($dx)/$1$2/;
     {
-       use bytes;
        print "not " unless $_ eq "$dx$dx";
        print "ok $test\n";
        $test++;