{ my $foo = SomeClass->new(); some_func(\$foo); } sub some_func { my ($object_ref_ref) = @_; $$object_ref_ref->in_element(); ... } ### OR ### { my $foo = SomeClass->new(); some_func($foo); } sub some_func { my ($object_ref) = @_; $object_ref->in_element() ... }