Re: Need help with a regex
On Tue, 7 May 2019 at 13:10, ToddAndMargo via perl6-users mailto:perl6-users@perl.org>> wrote: Hi All, What am I doing wrong here? $ p6 'my $x="\$1.23"; $x~~s/("\$") (.*?)/$1USD/; say $x;' USD1.23 I am expecting to see `1.23USD` Many thanks, -T On 5/6/19 8:24 PM, Norman Gaywood wrote: The .*? expression is not matching anything. I think you want to use .+ perl6 -e 'my $x="\$1.23"; $x~~s/("\$") (.*?)/$0:$1:USD/; say $x;' $::USD1.23 perl6 -e 'my $x="\$1.23"; $x~~s/ \$(.+) /$0USD/; say $x' 1.23USD Hi Normin, That was it. I wasn't greedy enough. Removing the ? $ p6 'my $x="\$1.23"; $x~~s/("\$") (.*)/$1 USD/; say $x;' 1.23 USD Thank you!
Re: Need help with a regex
The .*? expression is not matching anything. I think you want to use .+ perl6 -e 'my $x="\$1.23"; $x~~s/("\$") (.*?)/$0:$1:USD/; say $x;' $::USD1.23 perl6 -e 'my $x="\$1.23"; $x~~s/ \$(.+) /$0USD/; say $x' 1.23USD On Tue, 7 May 2019 at 13:10, ToddAndMargo via perl6-users < perl6-users@perl.org> wrote: > Hi All, > > What am I doing wrong here? > > $ p6 'my $x="\$1.23"; $x~~s/("\$") (.*?)/$1USD/; say $x;' > USD1.23 > > I am expecting to see `1.23USD` > > Many thanks, > -T > > > > > > > -- > ~~ > Computers are like air conditioners. > They malfunction when you open windows > ~~ > -- Norman Gaywood, Computer Systems Officer School of Science and Technology University of New England Armidale NSW 2351, Australia ngayw...@une.edu.au http://turing.une.edu.au/~ngaywood Phone: +61 (0)2 6773 2412 Mobile: +61 (0)4 7862 0062 Please avoid sending me Word or Power Point attachments. See http://www.gnu.org/philosophy/no-word-attachments.html
Need help with a regex
Hi All, What am I doing wrong here? $ p6 'my $x="\$1.23"; $x~~s/("\$") (.*?)/$1USD/; say $x;' USD1.23 I am expecting to seeĀ `1.23USD` Many thanks, -T -- ~~ Computers are like air conditioners. They malfunction when you open windows ~~