foreach my $address (@email_addresses) {
    my $is_valid = $address =~ /[a-zA-Z0-0.]+\@[a-zA-Z0-0.]+/;

    if ($is_valid) {
        ....
    }
}