print grep(/$a[8]/, @b);