$search = '.';
'.' =~ /$search/;      # match
'a' =~ /$search/;      # match
'.' =~ /\Q$search\E/;  # match
'a' =~ /\Q$search\E/;  # no match