my $bar = "true" if $foo; #### my $bar = $foo ? "Winner!!!" : "Please play again."; #### my ( $foo, $bar, $baz, $wumpus ); # or # my ( $foo, $bar, $baz, $wumpus ) = ( 5555, "Blossom Garden Rd", "San Jose, CA", 95123 ); if ( $tiddly_rump ) { $foo .... $bar .... $baz .... $wumpus .... }