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}