fix /test_bootstrap.t under -DPERL_NO_COW

[perl5.git] / t / op / concat2.t

diff --git a/t/op/concat2.t b/t/op/concat2.t
index cc6a541..9dfcc5b 100644 (file)
--- a/t/op/concat2.t
+++ b/t/op/concat2.t
@@ -15,8 +15,8 @@ plan 3;
 
 SKIP: {
 skip_if_miniperl("no dynamic loading on miniperl, no Encode", 1);
-skip('encoding pragma is deprecated', 1) if $] >= 5.017009;
 fresh_perl_is <<'end', "ok\n", {},
+    no warnings 'deprecated';
     use encoding 'utf8';
     map { "a" . $a } ((1)x5000);
     print "ok\n";