my $oldval; $val = func( $oldval=$val) || $oldval; #### $val = func( $_=$val) || $_; #### $val = do{ func( local $_=$val) || $_ };