diff options
| author | Karl Williamson <public@khwilliamson.com> | 2013-03-27 11:27:06 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2015-03-05 21:48:25 -0700 |
| commit | 0516404baa9906c79101b3a98ce5c43791c354c2 (patch) | |
| tree | c3f007afa5836bdd790789fc68806f4ac292f46e /ext/re | |
| parent | 5e8d268216881d9191f0637dd6cb32393e3fa689 (diff) | |
| download | perl-0516404baa9906c79101b3a98ce5c43791c354c2.tar.gz | |
ext/re/t/re_funcs_u.t: Generalize for non-ASCII platforms
Diffstat (limited to 'ext/re')
| -rw-r--r-- | ext/re/t/re_funcs_u.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/re/t/re_funcs_u.t b/ext/re/t/re_funcs_u.t index 770b456ca6..781ffc9706 100644 --- a/ext/re/t/re_funcs_u.t +++ b/ext/re/t/re_funcs_u.t @@ -80,7 +80,7 @@ if ('1234'=~/(?:(?<A>\d)|(?<C>!))(?<B>\d)(?<A>\d)(?<B>\d)/){ { # tests for new regexp flags - my $text = "\xE4"; + my $text = chr utf8::unicode_to_native(0xE4); my $check; { |