Re: question

On Tue, 20 Jun 2006, Collins, Ellen \(RSCH\) wrote:

> I am running perl.5.8.7.
> My script is attached. It does not run asynchronously. The commands
> execute one at a time.
> Does this work on windows? I am using windows 2000.
> Any help is much appreciated since I have spent much time on this
> problem.
> THANKS!
>  <<test2.pl>> 

...

|| $thr1=threads->new(&sub1);
|| $thr2=threads->new(&sub2);

You are calling sub1 and sub2, rather than passing the CODE refs themselves
as entry points for your threads.  I believe you mean to say:

  $thr1=threads->new(\&sub1);
  $thr2=threads->new(\&sub2);

|| # clean up the threads
|| $thr1->detach; 
|| $thr2->detach; 
||
|| exit(0);

Note, unless you synchronize with your spawned threads, your program will
probably complain that "A thread exited while %d other threads were still
running" when you exit here.

Regards,
Mike
--
cat: .signature: Level 2 halted