# New Ticket Created by Patrick R. Michaud
# Please include the string: [perl #112818]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=112818 >
As reported on the perl6-compiler mailing list:
pmichaud@kiwi:~/p6/rakudo$ cat x.pl
my $x = "> perl <";
say $x;
say $x.rindex('e');
my $y = "\x261b perl \x261a";
say $y;
say $y.rindex('e');
pmichaud@kiwi:~/p6/rakudo$ ./perl6 x.pl
> perl <
3
☛ perl ☚
substring not found
in method gist at src/gen/CORE.setting:8680
in sub say at src/gen/CORE.setting:6563
in block <anon> at x.pl:7
The underlying problem seems to be that Parrot's reverse_index
operation on unicode strings is broken -- see
https://github.com/parrot/parrot/issues/767
Pm
