Name "main::tsub" used only once: possible typo at ./t7.pl line 17.
Name "main::tlist" used only once: possible typo at ./t7.pl line 22.

 thread for e, tnum=0:
        the array from hash=3 2 3
        tsize[tnum]= 3
        {threads{thread[0]}}=3 2 3

 thread for c, tnum=0:
        the array from hash=5 2 3
        tsize[tnum]= 3
        {threads{thread[0]}}=5 2 3

 thread for a, tnum=0:
        the array from hash=1 2 3
        tsize[tnum]= 3
        {threads{thread[0]}}=1 2 3

 thread for b, tnum=0:
        the array from hash=2 2 3
        tsize[tnum]= 3
        {threads{thread[0]}}=2 2 3

 thread for d, tnum=0:
        the array from hash=4 2 3
        tsize[tnum]= 3
        {threads{thread[0]}}=4 2 3