Help for this page
if ($arr[$lcv] =~/^CONTACT_ME"/ and substr ($arr[$lcv], 25) eq 'YES')) + { $contact_me_count++; }