On Tue, May 08, 2012 at 05:19:40AM +0200, Frederik Schwarzer wrote: > Hi, > > I had a little problem with rindex and wrote a small demo code that > shows what I found. > > The code is: > use v6; > > my $string = "perl"; > say $string; > say $string.WHAT; > say $string.index("e"); > say $string.rindex("e"); > > say ""; > say @*ARGS[0]; > say @*ARGS[0].WHAT; > say @*ARGS[0].index("e"); > say @*ARGS[0].rindex("e"); > > When run, I see the following (with a two-week old build of Rakudo > master): > $ perl6 index.pl perl > perl > Str() > 1 > 1 > > perl > Str() > 1 > Failure.new(exception => X::AdHoc.new(payload => "substring not > found")) > > Do I miss something? Any help is appreciated.
$ install/bin/perl6 -e 'say nqp::p6box_s(pir::encodingname__SI(pir::encoding__IS(@*ARGS[0])))' perl utf8 $ install/bin/perl6 -e 'say nqp::p6box_s(pir::encodingname__SI(pir::encoding__IS("perl")))' perl ascii $ install/bin/perl6 -e 'say "perł".rindex("e");' perl substring not found in method gist at src/gen/CORE.setting:8140 in sub say at src/gen/CORE.setting:6244 in block <anon> at -e:1 $ install/bin/perl6 -v This is perl6 version 2012.03-27-g5793035 built on parrot 4.2.0 revision RELEASE_4_2_0 rindex appears to not like utf-8 encoded strings very much. -Stefan
signature.asc
Description: Digital signature