Subject: | Unescaped left brace in regex is deprecated here |
Tests fail with perl 5.27.8:
...
# Failed test 'no warnings'
# at /opt/perl-5.27.8/lib/5.27.8/Test/Builder.pm line 158.
# There were 2 warning(s)
# Previous test 0 ''
# Unescaped left brace in regex is deprecated here (and will be fatal in Perl 5.32), passed through in regex; marked by <-- HERE in m/
# ( # eval BLOCK, corresponding to the group 10 in the entire regex
# { <-- HERE
# ((?:
# (?> [^{}]+ ) # Non-braces without backtracking
# |
# (??{$re_block}) # Recurse to group 10
# )*)
# }
# )
# / at /home/cpansand/.cpan/build/2018012009/Module-ExtractUse-0.341-0/blib/lib/Module/ExtractUse.pm line 43.
# at /home/cpansand/.cpan/build/2018012009/Module-ExtractUse-0.341-0/blib/lib/Module/ExtractUse.pm line 43.
# require Module/ExtractUse.pm called at t/10_basic.t line 6
# main::BEGIN() called at /home/cpansand/.cpan/build/2018012009/Module-ExtractUse-0.341-0/blib/lib/Module/ExtractUse.pm line 43
# eval {...} called at /home/cpansand/.cpan/build/2018012009/Module-ExtractUse-0.341-0/blib/lib/Module/ExtractUse.pm line 43
#
# ----------
# Previous test 0 ''
# Unescaped left brace in regex is deprecated here (and will be fatal in Perl 5.32), passed through in regex; marked by <-- HERE in m/
# \G(.*?) # group 1
# eval
# (?:
# (?:\s+
# (?:
# qq?\((.*?)\) # eval q(), group 2
# |
# qq?\[(.*?)\] # eval q[], group 3
# |
# qq?{(.*?)} # eval q{}, group 4
# |
# qq?<(.*?)> # eval q<>, group 5
# |
# qq?(\S)(.*?)\6 # eval q'' or so, group 6, group 7
# )
# )
# |
# (?:\s*(?:
# (?:(['"])(.*?)\8) # eval '' or eval "", group 8, group 9
# |
# ( # eval BLOCK, group 10
# { <-- HERE
# ((?: # group 11
# (?> [^{}]+ ) # Non-braces without backtracking
# |
# (??{$re_block}) # Recurse to group 10
# )*)
# }
# )
# ))
# )
# / at /home/cpansand/.cpan/build/2018012009/Module-ExtractUse-0.341-0/blib/lib/Module/ExtractUse.pm line 76.
# at /home/cpansand/.cpan/build/2018012009/Module-ExtractUse-0.341-0/blib/lib/Module/ExtractUse.pm line 76.
# require Module/ExtractUse.pm called at t/10_basic.t line 6
# main::BEGIN() called at /home/cpansand/.cpan/build/2018012009/Module-ExtractUse-0.341-0/blib/lib/Module/ExtractUse.pm line 76
# eval {...} called at /home/cpansand/.cpan/build/2018012009/Module-ExtractUse-0.341-0/blib/lib/Module/ExtractUse.pm line 76
#
# Looks like you failed 1 test of 205.
t/10_basic.t ..............
Dubious, test returned 1 (wstat 256, 0x100)
Failed 1/205 subtests
... (and more) ...