Help for this page
$#{@{$object_ref->{array_ref}}}
foreach(0..$#{@{$object_ref->{array_ref}}}){ # I need the index! }
for(my $i=0;$i < scalar(@{$object_ref->{array_ref});$i++){ # I need the index! }