my @array1;
push @array1,threads->new(\&funct_array,($par1,$par2,$filename));
print Dumper \@array1;