Would this shave two strokes:

if rnd(2) and $p > $t

becomes:

if rnd(2) & $p > $t

-Shawn