Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

shemp's scratchpad

by shemp (Deacon)
on Jun 02, 2004 at 15:01 UTC ( [id://359473] : scratchpad . print w/replies, xml ) Need Help??

{ 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() ... }