Depending on your version of perl, you could use ithreads. They are supported on newer versions of perl. Not sure what version they were implemented.