On 1/12/19 3:04 PM, Timo Paulssen wrote:
On 12/01/2019 23:40, ToddAndMargo via perl6-users wrote:
But this does not. What is wrong with (<:N>**2) ?
$ perl6 -e 'my Str $Date=DateTime.now.Str; $Date~~m/ (<:N>**4) "-"
(<:N>**2) "-" (<:Nl>**2) "T" .* /; print "$Date\n\t$0 $1 $2\n"'
Use of Nil in string context
in block <unit> at -e line 1
Use of Nil in string context
in block <unit> at -e line 1
Use of Nil in string context
in block <unit> at -e line 1
2019-01-12T14:33:10.692302-08:00
Many thanks,
-T
Hi Todd,
it looks like you have an accidental l in there: the third capture group
has <:Nl> instead of <:N>.
Changing that makes it work for me
- Timo
Hi Timo,
Just out of curiosity, what is the difference between "Number (<:N>)"
and "Number Like (<:Nl>)"? What would they not be the same in this context?
My latest:
$ perl6 -e 'DateTime.now.Str ~~ m/ (<:N>+) "-" (<:N>+) "-" (<:N>+) "T"
.* /; my Str $Po="$1$2x$0_"; $Po~~s/x20//;print "$Po\n";'
011319_
I stuck the "x" in there so I would not clobber day = 20.
-T
