my $items = $#{$self->{menu_items}};
     for (my $item = 0; $item < $items; $item++)
                             ^^^