use threads; sub dump { my $self = shift; print "name: ", $self->name(), "\n"; } $obj = Some::InsideOut::Class->new( name => "Larry" ); my $thread = threads->create( \&dump, $obj ); $thread->join();