my @array1 = grep { /^sanj/ } @need;