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