my $x= some_sub();
    $x |||= 0;