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