See
Trying to Understand the Discouragement of Threads or
RT: Why are threads discouraged?. "Discouraged" here means threads in Perl are tricky and people in IRC who don't understand them won't help you solving the issues you might encounter. Several monks here have used threads successfully and can probably give you some hints.
($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,