ハッシュの値表示

ハッシュリファレンスの値表示は、

my @value_of_replies = values( %{ @{ $response }[0] } );
foreach my $value ( @value_of_replies ){
        print $value, "\n";
}

ハッシュの配列。宣言と初期化。要素の参照。すべての要素の出力。 - Perl入門〜サンプルコードによるPerl入門〜から

foreach my $index (0...@{$response}-1 ) {
        foreach my $key ( keys %{ $response->[$index] } ){
                print $response->[$index]{$key},"\n";
        }
}

上記のコードを追加すると値が表示される。

twitux
0
0
Fri Jan 23 15:36:59 +0000 2009
@XXXX test post perl practice enjoy!
14431529
HASH(0xa5de1d8)
1142178554
Use of uninitialized value $value in print at
XXX

userの部分は、さらにハッシュのリファレンスが返ってくる。