Sorry, I am a bit slow learner.

A pre-requisite for learning, is attempting. Had you at least attempted to adapt one of the previous answers working code to your problem and then come back for help, it would have seemed less like you were asking for a canned solution.

Perl version 6 which will address most of short falls of multithreading in Perl.

Two problems:

1. P6 is still at least a year away, as it has been for the past two (and more) years.
2. I too once believed that P6 would be the saving grace of threaded Perl.

   Unfortunately, it appears that it's threading model will be firmly based on the same terminally broken underlying model (pthreads) as both p5 implementations.

   It also appears to me, as an interested, somewhat knowledgable but otherwise impotent external observer, that at least 1/2 of the design team of Parrot have an active agenda to ignore the requirements (and with it, the benefits) of the threading model of multitasking.

   I could be misreading the signs, and things could change, but I have given up my hopes of P6 being a truely cross-platform multi-tasking capable language.