my $thread = new Thread \&processJobs, $self; and in process jobs use like this sub processJobs { my $self = $_[0]; }