my $array = $object_ref->{array_ref}; foreach my $idx (0..$#$array) { foreach my $ele ($array->[$idx]) { printf("%d %s\n", $idx, $ele); } }