# New Ticket Created by [email protected]
# Please include the string: [perl #127858]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=127858 >
$ cat > A.pm6
unit module A;
constant @a is export = map { (1 +< $_) => 1 }, ^3;
$ PERL6LIB=. perl6 -e 'use A; say @a[1];'
Cannot invoke this object
in block at /home/grondilu/A.pm6 (A) line 3
in block <unit> at -e line 1
$ perl6 -e 'module A { constant @a is export = map { (1 +< $_) => 1 }, ^3;
}; import A; say @a[1];'
2 => 1
$ perl6 --version
This is Rakudo version 2016.03-88-g600eb53 built on MoarVM version
2016.03-84-g4afd7b6
implementing Perl 6.c.
