This starts 100 threads in < 1/2 a second:
#! perl -slw use strict; use Time::HiRes qw[ time ]; use threads stack_size => 4096; my $start = time; async { #printf "%u starting\n", threads->tid; sleep 1e3 } ->detach for 1 .. 100; printf "Took %f seconds\n", time() - $start; __END__ C:\test>junk Took 0.445518 seconds
Those are do nothing threads, but still, you must be doing something weird. Post your code.
In reply to Re^6: Use more threads.
by BrowserUk
in thread Use more threads.
by BrowserUk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |