for my $item ( @{ $d->{item} } ) {
  print "$item->{title}\n";          # for example
}