$foo = shift || 1;
# is the same as
$foo = (shift || 1);