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