for (my $item = 0; $item <= $#{$ref}; $item++) {

##</code><code>##

for my $item (0 .. $#{$ref}) {

##</code><code>##

foreach my $hashref (@{$ref}) {