Warning: Completely Untested!!!! But, try this:

if($arr[$lcv] =~ /^CONTACT_ME:/){
      $contact_me = substr("$arr[$lcv]", 25);
}
elsif($contact_me eq 'YES'){
          $contact_me_count++;
      }
else {# define some default behaviour here}
[download]

UPDATE: removed space, as per azatoth's post