my $q_meta = quotemeta($q); my $tmp_test = ($page_title =~ /$q_meta/i) || 0; if (!$tmp_test) { my $tmp_test2 = lc $page_title eq lc $q; $is_exit = 1 if $tmp_test2; my $tmp_test3 = is_utf8($page_title); my $tmp_test4 = is_utf8($q); # For debugging. if ($is_dilbert) { warn qq(\nDILBERT 1a\t$page_title\t$q_meta\t$tmp_test\t$tmp_test2\t$tmp_test3\t$tmp_test4\n") if \ $is_dilbert; }