note
TimToady
In Perl 6 we can use positive boolean context, which helps readability a little:
<code>
if ?$x == ?$y {...}
if ?$x != ?$y {...}
</code>
We can use junctions, which again helps the different case more than the same case:
<code>
if not $x ^ $y {...}
if $x ^ $y {...}
</code>
or if you prefer:
<code>
if !one($x,$y) {...}
if one($x,$y) {...}
</code>
That's probably enough ways to do it...
732286
733338