panic: sv_len_utf8 cache 0 real 1

$ cat s
for my $i (0..1)
{
  print (length(substr("\x{100}",0,$i)));
}

$ ./perl s
panic: sv_len_utf8 cache 0 real 1 for Ā at s line 3.
0

$ ./perl -v

This is perl 5, version 13, subversion 1 (v5.13.1-209-g7c8a36d) built for darwin-thread-multi-2level

Original report <http://bugs.activestate.com/show_bug.cgi?id=87172>

• panic: sv_len_utf8 cache 0 real 1 by Gisle Aas
• Re: panic: sv_len_utf8 cache 0 real 1 by Nicholas Clark