in reply to Re^7: AND and OR on Regular Expressions
in thread AND and OR on Regular Expressions

I'm not missing that line. All matches are against the same $_.
  • Comment on Re^8: AND and OR on Regular Expressions

Replies are listed 'Best First'.
Re^9: AND and OR on Regular Expressions
by ikegami (Patriarch) on Aug 26, 2009 at 14:02 UTC

    Then look again.

    Are you are your saying your comments are wrong 

    /$pat1/ && /$pat2/;          # Sets $1 (twice).
/$pat1/ && /$pat2/;          # Sets $1.

    [download]
    /^(?=.*?$pat1)(?=.*?$pat2)/; # Sets $1 and $2.
/^(?=.*?$pat1)(?=.*?$pat2)/; # Doesn't set $1 or $2.

    [download]

    And that you repeated 4 lines of code for nothing? 

        $pat1 = "(foo)";
    $pat2 = "(bar)";
    /$pat1/ && /$pat2/;
    /^(?=.*?$pat1)(?=.*?$pat2)/;

    $pat1 = "(foo)";
    $pat2 = "(baz)";
    /$pat1/ && /$pat2/;
    /^(?=.*?$pat1)(?=.*?$pat2)/;

    [download]

    I swear I checked that a million times first. I'm blind! Needless to say, it would have been clearer to change $_ instead.

[reply]
[d/l]
[select]
      I'm sorry, but since when does bar equal baz? $_ may not change, but $pat2 does. And that makes all the difference.
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom