@tlist[$tnum] = @{$threadds{$thread};