2007年04月24日00:45 カテゴリLightweight Languages perl - POO と goto というわけで、本番。 404 Blog Not Found:perl - 万能なnewの書き方 ここからが面白くなるのだが次のEntryへ譲るここに着目していただきたい。 sub init { my $self = shift; $self->{$_} = $default{$_} for keys %default; $self->SUPER::init(); } 初期化に限らず、自分で何かをしたら次のメソッドに振るというのは、OOでは非常によく見られる光景だ。特にpluginなどを使っている場合、それが著しい。 しかし、このコード、次のメソッドに振っているのはいいのだけど、振ってから戻ってくるのだ。メソッド呼び出しも関数呼び出しに過ぎないのだから、当然といえば当然だ
![404 Blog Not Found:perl - POO と goto](https://cdn-ak-scissors.b.st-hatena.com/image/square/d6e2bfae66943515b7498056f8cf25c20fd8b27e/height=288;version=1;width=512/https%3A%2F%2Flivedoor.blogimg.jp%2Fdankogai%2Fimgs%2Fd%2F6%2Fd638f08e.png)