There is no longer a duplicate key in the .gist output:
$ perl6-m -e "say ('/foo/bar/baz/' ~~ m/^ $<dirname>=(.* '/'+)?
$<basename>=(<-[\/]>+) '/'* $ /).gist"
｢/foo/bar/baz/｣
dirname => ｢/foo/bar/｣
basename => ｢baz｣
I added a test to S02-names-vars/list_array_perl.t (couldn't find a better
place) with the following commit:
https://github.com/perl6/roast/commit/9acc51a8d9
Please note: All of the above is under the assumption that the originial
command (which is missing from the IRC log) was:
r: say ('/foo/bar/baz/' ~~ m/^ $<dirname>=(.* '/'+)? $<basename>=(<-[\/]>+)
'/'* $ /).gist
If I misinterpreted the problem, please reopen the ticket.
