Posted at

読み取り専用配列

More than 5 years have passed since last update.

Internals::SvREADONLY (@hoge, 1);

のようにして読み取り専用にした配列に

eval {

push @hoge, $fuga;
};

と push するとエラーになる。そこまでは良いのだけれど、 $fuga の参照数が上がってしまうらしくずっと解放されない。

https://gist.github.com/4244683