配列のハッシュ：使い方メモ

最初なんかうまいこと動かせなかった。括弧を [] でやってた部分があったかららしい。

#!/usr/bin/perl -w
use strict;
use warnings;

my @list;
push @list, (
              {
                hoge => "test",
                test => "hello",
              },
              {
                hage => "test?",
                test => "World",
              }
            );

my $hogehoge = {
      list => \@list,
   };

foreach( @{ $hogehoge->{list} } ){
  print "$_->{test}\n";
}

1;
__END__