[perl #96472] Optional named capture in regex evaluates incorrectly to one in numeric context.

# New Ticket Created by  Ron Schmidt 
# Please include the string:  [perl #96472]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=96472 >


The first output below looks ok ...

.\perl6 -e "my $m = '4' ~~ /<digit>/; say $m<digit>; say $m<digit>  +0"
4
4

But now when I make the named element optional it seems to get the 
evaluation in numeric context wrong ...

.\perl6 -e "my $m = '4' ~~ /<digit>?/; say $m<digit>; say $m<digit>  +0"
4
1


This seems fixed in nom.

Ron

• [perl #96472] Optional named capture in regex evaluates incorrectly to one in numeric context. by Ron Schmidt