in reply to Perl GREP

If your variable contains metacharacters, you will need to escape them when you interpolate -- see Quoting metacharacters. Perhaps something like if ( grep /\Q$Check \E/i, <FILE> ) does what you mean?