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


in reply to Re: Hints Towards Writing a Module with New Operators
in thread Hints Towards Writing a Module with New Operators

!($a xor $b)

Replies are listed 'Best First'.
Re^3: Hints Towards Writing a Module with New Operators
by BrowserUk (Pope) on Dec 20, 2009 at 01:03 UTC

    Or

    1. .NEQV. ~= $a ^ $b
    2. .EQV. ~= !($a ^ $b)

    Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
    "Science is about questioning the status quo. Questioning authority".
    In the absence of evidence, opinion is indistinguishable from prejudice.
      Those aren't the same:
      !(2 xor 1); # => 1 !(2 ^ 1); # => 0

        You're right of course.


        Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
        "Science is about questioning the status quo. Questioning authority".
        In the absence of evidence, opinion is indistinguishable from prejudice.