my ($stdout, $stderr, $ret) = capture {
    system('foo',
        ($somearg  ? ('--somearg'  => $somearg ) : ()),
        ($otherarg ? ('--otherarg' => $otherarg) : ()),
    );
};

##</code><code>##

return {
    status => $s,
    ($optional_field ? (optional_field => $optional_field) : ()),
};