summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--t/uni/labels.t4
1 files changed, 2 insertions, 2 deletions
diff --git a/t/uni/labels.t b/t/uni/labels.t
index 8cb1ac4bde..e3ff938174 100644
--- a/t/uni/labels.t
+++ b/t/uni/labels.t
@@ -11,7 +11,7 @@ BEGIN {
use utf8;
use open qw( :utf8 :std );
use warnings;
-use feature 'unicode_strings';
+use feature qw 'unicode_strings evalbytes';
use charnames qw( :full );
@@ -36,7 +36,7 @@ SKIP: {
LOOP: {
Encode::_utf8_off($prog);
- eval $prog;
+ evalbytes $prog;
like $@, qr/^Unrecognized character/, "..but turn off the UTF-8 flag and it explodes";
}
}