$x = 0; $x = $x || 5; # prints 5 print $x; $x = 4; $x = $x || 5; $prints 4 print $x; $x = $x || 5; # prints 5 print $x;