( (shift @ARGV) ? (my $foo) : (my $bar) ) = "Hello";