for my $search (0..@array1)