use threads;; { package junk; sub new{bless [], $_[0] } sub method{ printf __PACKAGE__ . ": @_" } } $o = junk->new;; async{ sub{ $o->method( qw[ the quick brown fox ] ) } };; ## No output! async \&junk::method, $o, qw[ the quick brown fox ];; #outputs junk: junk=ARRAY(0x1adcdec) the quick brown fox