http://www.perlmonks.org?node_id=346077


in reply to Re: Re: Why do we say the =~ operator "binds"?
in thread Why do we say the =~ operator "binds"?

I'd hate for people to read that and think I didn't actually mean assignment.

Then don't write it that way:

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

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

[download]

Seriously, if you're writing code for public consumption and think, "Gee, I hope who's ever reading this can understand it," then rewrite it so you're sure they'll be able to understand it, or comment it, or do both.

In Section Seekers of Perl Wisdom