高見知英のかいはつにっし(β)

高見知英のアプリケーション開発日誌 のほか、地域活動などの活動報告ブログ。

うーんん?

 昨日からいきなりこんなエラーが
Attempt to free unreferenced scalar: SV 0x1562318, Perl interpreter: 0x274304 at ./lib/main.pl line 233.
Googleで検索して見たところ、参照カウント周りでエラーが起こったようですが、何が起こったのだか。検索結果にも決めてといえるような文章はありません。
上で指摘されている位置に書かれているコードは

  $text =~  s/<#$_(\s(.+?))?>/&{$val}(split " ", $2)/ge; 

 そこから辿っていって、一番原因っぽいのが下記コード

  $isfield = sub { 
    $_[0] =~ s/f:(\w+)/$_->{$1}/; 
    return $_->{$1} ? $SPLITS{$_[1]} : $SPLITS{$_[2]};
  };

でも先頭行でdieしても同じエラーが出るので、このサブルーチンが呼び出されること自体に問題があるのかも…。
 というか

"0x2806727b" の命令が "0x20656576" のメモリを参照しました。メモリが "read" になることはできませんでした。

 なんてダイアログが出たんだから、Perlのバグということになるんでしょうか。