PerlからJSONの配列にアクセス

PerlからJSONの配列にアクセスするときに参考になったリンク。

http://stackoverflow.com/questions/8258387/accessing-values-of-json-structure-perl