foreach my $vals (values %$VAR1) { foreach my $valref (@$vals) { print "Name = $valref->{name}\n"; print "Reference = $valref->{reference}\n\n"; } }