sub foo {

    ...

    $obj->(@_[1..$#_]);
}