Select Code to Download

use MCE::Simple -strict, max_workers => 4;

...

say "fib(20) = ", fib(20);

$ perl demo.pl 
hello from 1
...
10794 0 foo 0  something from 10794
10795 0 baz 0  something from 10795
fib(20) = 6765

use MCE::Simple -strict, max_workers => 16;

...
}

printf "%0.3f seconds\n", time - $start;

mce_foreach_f ("/path/to/file") {
    MCE->print($_);
...
}

close $fh;