my $bar = "true" if $foo;

##</code><code>##

my $bar = $foo ? "Winner!!!" : "Please play again.";

##</code><code>##


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 ....
}