Brian Raven wrote:
>  
> > use vars qw ($counter $thr $thread $threads);
>  
>  Prefer declare variables lexically (i.e. my ...), unless you actually
>  need to do otherwise.

Me too.

> > # Asynchronously join threads.
> > $threads = threads->list();
>  
>  Note that $threads contains a single thread object ...

Actually it doesn't - it contains the number of non-joined, non-detached
thread objects.
_______________________________________________
ActivePerl mailing list
ActivePerl@[...].com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs