if($arr[$lcv] =~ /^CONTACT_ME:/){ $contact_me = substr("$arr[$lcv]", 25); if($contact_me eq 'YES'){ $contact_me_count ++; } }