open(ROFILE, "<", $mExcludingFile) or die("Can't open $mExcludingFile exception file!");
while(<ROFILE>) {
  push(@mArray, $_);
}
...

##</code><code>##

...
      my $mLineNow = "$email $name\n";
...
      foreach $mArrayNow (@mArray) {
        if ($mLineNow eq $mArrayNow) {

##</code><code>##

open(ROFILE, "<", $mExcludingFile) or die("Can't open $mExcludingFile exception file!");
while(<ROFILE>) {
  s/\s+$//;
  push(@mArray, $_);
}

##</code><code>##

      my $mLineNow = "$email $name"; # no newline needed here