sub setresuid {
    # force @_ to have three elements
    $#_ = 2;

    # replace undefs in @_ with -1
    for ( @_ ) {
        $_ = -1 if ! defined $_;
    }

    # magic goto the real setresuid
    goto &real_setresuid;
}