In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/631d564d55844d5113b56f53d7c2270cd0e6ef25?hp=8b5730700c25a05280970d71df4eb7ca45967f2b>
- Log ----------------------------------------------------------------- commit 631d564d55844d5113b56f53d7c2270cd0e6ef25 Author: Father Chrysostomos <[email protected]> Date: Sat Jan 3 18:55:49 2015 -0800 reg_nocapture.t: Skip %+ tests under miniperl ----------------------------------------------------------------------- Summary of changes: t/re/reg_nocapture.t | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/t/re/reg_nocapture.t b/t/re/reg_nocapture.t index 40c3080..f354cea 100644 --- a/t/re/reg_nocapture.t +++ b/t/re/reg_nocapture.t @@ -44,8 +44,12 @@ is($1, 'a', "named capture allows $1 with /n"); is($2, 'b', "named capture allows $2 with /n"); is($3, undef, "(.*) didn't capture with /n"); -is($+{a}, 'a', "\$+{a} is correct"); -is($+{b}, 'b', "\$+{b} is correct"); +SKIP: { + skip "no %+ under miniperl", 2 if is_miniperl(); + no strict 'refs'; + is(${"+"}{a}, 'a', "\$+{a} is correct"); + is(${"+"}{b}, 'b', "\$+{b} is correct"); +} is(qr/(what)/n, '(?^n:(what))', 'qr//n stringified is correct'); -- Perl5 Master Repository
