Re^4: scanning hash

[bageler]

need to change that slightly so it will return true if all the keys are undef:

return 0 unless defined $_ ? $_ eq $value : defined $value ? 0 : 1

[Aristotle]

No, I don't.

$ perl -le'print undef eq undef'
1

Update: oh, I see what made you think that. I had to NOT my XOR condition. I forgot that XOR produces false rather than true if both operands are equal.