if( my $foo = bar(@quux) ) {
        $foo exists here
    }
    # no foo here