diff options
| author | Karl Williamson <khw@cpan.org> | 2019-03-17 21:06:10 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2019-03-18 10:40:15 -0600 |
| commit | 2abbd513b87245ddb806e6bc4f59945ecb46dced (patch) | |
| tree | 1b530ee7d9511a1ec1c67dbfc79082e740c5ef4f /t/re/reg_mesg.t | |
| parent | fd1dd2eb05554dea51a1d125b5dfcea0f028a583 (diff) | |
| download | perl-2abbd513b87245ddb806e6bc4f59945ecb46dced.tar.gz | |
Implement variable length lookbehind in regex patterns
See [perl #132367].
Diffstat (limited to 't/re/reg_mesg.t')
| -rw-r--r-- | t/re/reg_mesg.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/re/reg_mesg.t b/t/re/reg_mesg.t index e4c008be1a..e7251a9571 100644 --- a/t/re/reg_mesg.t +++ b/t/re/reg_mesg.t @@ -128,7 +128,7 @@ my @death = ( '/[[=foo=]]/' => 'POSIX syntax [= =] is reserved for future extensions {#} m/[[=foo=]{#}]/', - '/(?<= .*)/' => 'Variable length lookbehind not implemented in regex m/(?<= .*)/', + '/(?<= .*)/' => 'Lookbehind longer than 255 not implemented in regex m/(?<= .*)/', '/(?<= x{1000})/' => 'Lookbehind longer than 255 not implemented in regex m/(?<= x{1000})/', @@ -415,7 +415,7 @@ my @death_only_under_strict = ( # These need the character 'ネ' as a marker for mark_as_utf8() my @death_utf8 = mark_as_utf8( - '/ネ(?<= .*)/' => 'Variable length lookbehind not implemented in regex m/ネ(?<= .*)/', + '/ネ(?<= .*)/' => 'Lookbehind longer than 255 not implemented in regex m/ネ(?<= .*)/', '/(?<= ネ{1000})/' => 'Lookbehind longer than 255 not implemented in regex m/(?<= ネ{1000})/', |