my @bintext2 = grep { /\Q$input\E/i } @bintext;