if ($line =~ m/\Q$process\E/i) { #### if (index(lc($line), lc($process)) >= 0)) { #### if ($line =~ m/^\Q$process\E\z/i) { #### if (lc($line) eq lc($process)) {