Perl コーディング初心者質問コーナー Part35
レス数が950を超えています。1000を超えると書き込みができなくなります。
0985nobodyさん
04/07/13 18:07ID:C9iP6fNVif ($] > 5) {
eval( $icode = &jcode'getcode(\$hash{$key}) );
}
else {
$tmp = $hash{$key};
$icode = &jcode'getcode(*tmp);
}
Perl4でのエラーを回避しようとeval に放り込んでみたんですが
やっぱりエラーでしょうか？
レス数が950を超えています。1000を超えると書き込みができなくなります。