print "$_\n" for @{ $data->{genres} }; [download]
See also:
In reply to Re^3: Array / Hash Confusion! by toolic in thread Array / Hash Confusion! by andy503