{
    my $x;
    if( $x = f() and g($x) ) {
        ...
    }
}

##</code><code>##

{
    last unless( my $x = f() );
    last unless(  g($x)      );
    ...

}