[Edinburgh-pm] Spot the bug

[Miles Gould]

On 29/04/13 11:10, Aaron Crane wrote:
> I did detect the bug by inspection — you narrowed it down very
> conveniently, after all

Yes: as you may have guessed, my code only took on the form shown after 
several rounds of refactoring for greater testability. But note that 
this problem would also have occurred if I'd just assigned the result to 
a variable:

$ perl -E 'my $fred = 0 xor 1; say $fred'
0

I conclude from this that Perl's xor operator has the wrong precedence, 
and one should always bracket it.

Miles