Help for this page
#!/usr/bin/perl ... $pm->finish(0, { key => $key }); } $pm->wait_all_children;
[user@localhost ~/bin]$ perl a.pl peter took the 'C' key ... luke took the '' key andrew took the 'C' key judas took the 'B' key