develooper Front page | perl.perl6.users | Postings from June 2018

Re: How do I remove leading zeros?

Thread Previous | Thread Next
From:
ToddAndMargo
Date:
June 13, 2018 18:23
Subject:
Re: How do I remove leading zeros?
Message ID:
299c98ac-0994-f81a-93fc-6ccb78fcb3ae@zoho.com
On 06/13/2018 11:18 AM, Brad Gilbert wrote:
> On Wed, Jun 13, 2018 at 1:09 PM ToddAndMargo <ToddAndMargo@zoho.com> wrote:
>>
>> On 06/13/2018 11:06 AM, ToddAndMargo wrote:
>>> On 06/13/2018 11:03 AM, ToddAndMargo wrote:
>>>> On 06/13/2018 11:00 AM, Larry Wall wrote:
>>
>>>      $ p6 'my $x = "01.000.103.006.10"; $x ~~ s:g/«0+)>\d//; say "$x"'
>>>      1.0.103.6.10
>>
>> Hi Larry,
>>
>>       How did you get thee "«" character to appear?  And
>> what does it mean?
>>
> 
> The way I type them is [compose] [<] [<], which is nice because their
> ASCII equivalent is <<
> 
> It means match a word boundary with the word being on the right side.
> 
>      > say 'ABC DEF ' ~~ m:g/ << . /
>      (「A」 「D」)
>      > say 'ABC DEF ' ~~ m:g/ >> . /
>      (「 」 「 」)
> 


$ p6 'my $x = "01.000.103.006.10"; $x ~~ s:g/<<0+)>\d//; say "$x"'
1.0.103.6.10

Thank you!


-- 
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Computers are like air conditioners.
They malfunction when you open windows
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About