my $val = ( $EXPR ) ?  $x : $y;
my $var = sprintf( "...", $val );