print "email sent to: $contact <$toemail>
\n"; $count++ #### $log = email sent to: $contact <$toemail>
";