Perlについての質問箱 34箱目
レス数が950を超えています。1000を超えると書き込みができなくなります。
0952デフォルトの名無しさん
2008/04/15(火) 21:06:10再帰+utf8文字列でのtr///(=S_do_trans_simple_utf8が呼ばれる)で落ちるみたい。
再帰前にtr///が実行されるかどうかは無関係だし、再帰前のtr///も普通に成功した。
手持ちの奴だと
○ ActivePerl 5.8.7.813
○ ActivePerl 5.8.8.816
○ ActivePerl 5.8.8.820 2007/01/23
× ActivePerl 5.8.8.822 2007/07/31
× ActivePerl 5.10.0.1001
という感じ。
use utf8;
sub foo {
&foo(0) if $_[0] == 2;
print STDERR "1\n";
tr/あ/A/; # 要utf8
print STDERR "2\n";
&foo(0) if $_[0] == 1;
}
$_='bar'; # $_ = '' にして実行時にdo_transから直にリターンさせると落ちない。
&foo(1); #
レス数が950を超えています。1000を超えると書き込みができなくなります。