$foo = $bar if not defined $foo;
$foo = $baz if not defined $foo;
$foo = $quux if not defined $foo;