@result = grep/\Q$a\E/i, @sea;