[ale] Perl threads

[Christopher Fowler]

I'm writing a program to use threads in Perl.  I have replaced print
with _print that will place a time stamp before each entry in the log
file.  I want to make sure that two _print executions do not step on
each others toes.  Is there a way to create a variable and lock it like
I would in Posix threads?  I could then lock on entry of _print and then
unlock on exit.

Chris