sub some_method {
    my ($self, $arg) = @_
    ...
    $arg->other_method();
    ...
}