my @items = @{$data->{channel}->{item}}; for my $hash ( @items ) { print 'title: ' . $hash->{title}; print 'link: ' . $hash->{link}; print 'desc: ' . $hash->{description}; }