AUTOLOADサブルーチンが実行される条件？

Perlのコードを動かしながら勉強していて、ふと納得いかない点があったので教えてください。

次のコードを実行すると'0'と表示されます。

Cls->new;
package Cls;
sub new {bless([])}
sub AUTOLOAD {print(0)}

つまりAUTOLOADサブルーチンが実行されているようです。
しかし私のコードの中ではAUTOLOADサブルーチンの定義はしているものの、どこからも呼び出していません。

このコードは何も行わずに終了するはずなのですが、そうではありませんでした。
AUTOLOADサブルーチンは、いつ、どこで、何者によって呼び出されるのでしょうか。

No.2 ベストアンサー 回答者： _--_1l1_1_ 回答日時： 2011/07/12 01:49

DESTROYを呼ぼうとして、DESTROYが存在しないのでAUTOLOADを呼びました。

オブジェクトが参照されなくなり、オブジェクトが破棄されるときDESTROYが呼ばれます。

この回答へのお礼

なるほど！

このコードではnewの結果をすぐさま捨てているので、
DESTROYが呼ばれるのはnewを実行した直後ですね。

もし私がnewの後に何かコードを書いていれば、どのタイミングで'0'が表示されるかは調べられましたね^^;

お礼日時：2011/07/12 09:56

No.4 回答者： Tacosan 回答日時： 2011/07/12 23:43

ちと調べてみると, our は 5.6.0 で入ったようですね. 5.6.0 のリリースは 2000年の 5月. おお, 前世紀なのか.

ちなみに今の最新は 5.14.1.

この回答へのお礼

おっと、この本は中古で入手したので、
私のPerlの勉強が10年以上滞っているとは考えないでいただきたい！！！
せいぜい6～7年です^^;

お礼日時：2011/07/13 16:40

No.3 回答者： Tacosan 回答日時： 2011/07/12 10:53

ちなみに

sub AUTOLOAD { our $AUTOLOAD; print "$AUTOLOAD\n"; }
としておけば「何が足りなかったのか」はわかります.

この回答へのお礼

AUTOLOADに実際に呼び出されたサブルーチン名を報告させるのですね；

ところで私の本はだいぶ時代遅れになってしまいました。
この本にはPerlの全関数が載っているはずなのですがourは載っていませんでした。
この関数は初めて知りました^^;

お礼日時：2011/07/12 20:12

No.1 回答者： Tacosan 回答日時： 2011/07/12 01:19

ちょっと調べた.

参考URL：http://d.hatena.ne.jp/okamuuu/20100429/1272507611

この回答へのお礼

なるほど！

クラスにはDESTROYというサブルーチンを用意しないといけないのですね。
それが無かったもんだからPerlが仕方なくAUTOLOADを呼んだのですね。

お礼日時：2011/07/12 09:45