# New Ticket Created by Itsuki Toyota
# Please include the string: [perl #131184]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=131184 >
See the following results:
$ perl6 -e 'say (1..10).map({ { :a($_) } });'
(a => 1 a => 2 a => 3 a => 4 a => 5 a => 6 a => 7 a => 8 a => 9 a => 10)
$ perl6 -e 'say (1..10).map({ ${ :a($_) } });'
(-> ;; $_? is raw { #`(Block|57168408) ... } -> ;; $_? is raw {
#`(Block|57168480) ... } -> ;; $_? is raw { #`(Block|57168552) ... } -> ;; $_?
is raw { #`(Block|57168624) ... } -> ;; $_? is raw { #`(Block|57168696) ... }
-> ;; $_? is raw { #`(Block|57168768) ... } -> ;; $_? is raw {
#`(Block|57168840) ... } -> ;; $_? is raw { #`(Block|57168912) ... } -> ;; $_?
is raw { #`(Block|57168984) ... } -> ;; $_? is raw { #`(Block|57169056) ... })
I think the 2nd example should return the same result as the 1st example.
$ perl6 --version
This is Rakudo version 2017.03-217-ge681498 built on MoarVM version
2017.03-115-ge8231a3
implementing Perl 6.c.
