Need help with a regex

[ToddAndMargo via perl6-users]

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
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~