Это невалидный UTF-8 в исходнике.
Что за редактор у вас?

22.04.2014, 22:18, "Alan Rafagudinov" <[email protected]>:
> Привет, коллеги!
>
> Мозг себе сломал, не могу понять природу ошибки:
>
> #!/usr/bin/env perl
>
> use strict;
> use utf8;
>
> my $str = " № 00";
>
> $str =~ /\bXXX\s?0/i;
>
> При запуске этого кода получаю:
>
> "panic: swash_fetch got swatch of unexpected bit width, slen=32,
> needents=64 at ./1.pl line 8."
>
> Есть идеи почему?
>
> Кстати, например, следующий код не ругается:
>
> #!/usr/bin/env perl
>
> use strict;
> use utf8;
>
> my $str = " № 0";
>
> $str =~ /\bXXX\s?0/i;
> --
> Moscow.pm mailing list
> [email protected] | http://moscow.pm.org

-- 
Oleg Alistratov
-- 
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить