Perlのクラスメンバの配列変数

メモ。
Perlでクラスを作ったときに配列のメンバ変数を持ちたい時。

my $self = {
	arr_ => [@list]
};

でハッシュに入れて

foreach (@{ $self->{arr_} }) {
	print $_ . "\n";
}

みたいにして使う。

[]で配列の無名リファレンスを作ってスカラに代入、
@{}で配列にデリファレンスして使うっていう理解で合ってるだろうか。

追記@2010/09/02-09:06
忘れてた
参考