ハッシュの値表示
ハッシュリファレンスの値表示は、
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の部分は、さらにハッシュのリファレンスが返ってくる。