From 740b32c3da0d3adbb96e6d0088ca25c4ede1b242 Mon Sep 17 00:00:00 2001
From: Karl Williamson <public@khwilliamson.com>
Date: Mon, 20 May 2013 21:54:01 -0600
Subject: [PATCH] t/lib/feature/implicit: Generalize for non-ASCII platforms

---
 t/lib/feature/implicit | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/t/lib/feature/implicit b/t/lib/feature/implicit
index a741421..99ab011 100644
--- a/t/lib/feature/implicit
+++ b/t/lib/feature/implicit
@@ -107,9 +107,10 @@ b
 ########
 # Implicit unicode_string feature
 use v5.14;
-print 'ss' =~ /\xdf/i ? "ok\n" : "nok\n";
+my $sharp_s = chr utf8::unicode_to_native(0xdf);
+print 'ss' =~ /$sharp_s/i ? "ok\n" : "nok\n";
 use v5.8.8;
-print 'ss' =~ /\xdf/i ? "ok\n" : "nok\n";
+print 'ss' =~ /$sharp_s/i ? "ok\n" : "nok\n";
 EXPECT
 ok
 nok
-- 
1.8.3.1