くだすれPerl（超初心者用）3

[0275 nobodyさん 2009/09/09(水) 17:52:15 ID:???]

うーん、意味が理解できないけど動いた・・・・。

foreach $value (keys %{$DATA{$unko}}){
print $value;
}