On 06/13/2018 11:03 AM, ToddAndMargo wrote:
On 06/13/2018 11:00 AM, Larry Wall wrote:
I'd probably just write something like:
s:g { « <( 0+ )> \d+ » } = '';
The first <( and the last » are not strictly necessary, but add
clarity, or
at least balance. But in golf mode you could get away with something
like:
sg/«0+)>\d//;
Larry
Awesome! Thank you!
$ p6 'my $x = "01.0.103.06.10"; $x ~~ s:g/«0+)>\d//; say "$x"'
1.0.103.6.10
What did you just do?
Sweet!
$ p6 'my $x = "01.000.103.006.10"; $x ~~ s:g/«0+)>\d//; say "$x"'
1.0.103.6.10