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