my $var = ( $test =~ m/regex/ ) ? "true value" : "false value";

##</code><code>##

my $var1;
my $var2;
if( $clause )
{
   $var1 = "blah";
   $var2 = "deblah";
}
else
{
   $var1 = "foo";
   $var2 = "bar";
}