# New Ticket Created by  Daniel Green 
# Please include the string:  [perl #127972]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=127972 >


>time ./perl6 -e 'my str $a = "a" x 2**29;'

real    0m11.982s
user    0m11.387s
sys     0m0.583s

>time ./perl6 -e 'my $a = "a" x 2**29;'

real    0m0.137s
user    0m0.123s
sys     0m0.013s

Oddly enough, it's fast when the native string is in a variable.

>time ./perl6 -e 'my str $a = "a";my str $b = $a x 2**29;'

real    0m0.137s
user    0m0.127s
sys     0m0.010s

>./perl6 -version
This is Rakudo version 2016.04-17-g5a14162 built on MoarVM version 2016.04
implementing Perl 6.c.

Reply via email to