$a = 0;
$b = 0;
$c = ++$a || ++$b;  # only ++$a is evaluated
print "a = $a, b = $b\n";  # prints "a = 1, b = 0"