The results of an XOR always depend on both operands, so it always evaluates both and thus is useless as far as control flow is concerned. Using XOR is the same as just writing the operands separately if you're not interested in the result.
That code looks more like LISP than Perl if I may comment btw, and the first thing I'd do if I ran across it is rewrite. Use naked blocks, next and last in Perl, that's easier to read and just as efficient.
Makeshifts last the longest.
In reply to Re: logical Exclusive Or, xor
by Aristotle
in thread logical Exclusive Or, xor
by fruiture
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |