# New Ticket Created by Daniel Green
# Please include the string: [perl #127971]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=127971 >
>./perl6 -e 'my $a = "a" x 2**30;my $b = "b" x 2**30;my $c = $a ~ $b;my $d
= $b ~ $a;my $e = $c ~ $d;say "length of \$e == {$e.chars}, expecting
{$c.chars+$d.chars}";'
length of $e == 0, expecting 4294967296
>./perl6 -version
This is Rakudo version 2016.04-17-g5a14162 built on MoarVM version 2016.04
implementing Perl 6.c.
A Rakudo PR was submitted (https://github.com/rakudo/rakudo/pull/754), but
closed with the suggestion that an RT ticket be created and the solution be
implemented at a lower level than Rakudo/Perl6.