my @paramters = ($self);
  my $thread = new Thread \&processJobs, \@paramters;

##</code><code>##

sub processJobs
{
  my $self = shift;
}

##</code><code>##

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