Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re: script hanging at thread start [MCE::Flow alternative]

by 1nickt (Abbot)
on Nov 24, 2020 at 23:05 UTC ( #11124174=note: print w/replies, xml ) Need Help??


in reply to script hanging at thread start

Hi, here's something that does not require threads, powered by the Perl Many-Core Engine:

use strict; use warnings; use MCE::Flow chunk_size => 1; mce_flow sub { chomp; printf("%s processing %s\n", $$, $_); if (/(\w.+\w\d+.+net),(\w+)/) { my $host = $1; my $type = $2; printf "%s connecting to %s\n", $$, $host; } printf "%s finished %s\n", $$, $_; }, [(<DATA>)]; __DATA__ server1.net,value server2.net,value server3.net,value server4.net,value
Output:
perl 11124156.pl 597 processing server3.net,value 605 processing server2.net,value 595 processing server1.net,value 600 processing server4.net,value 605 connecting to server2.net 595 connecting to server1.net 600 connecting to server4.net 605 finished server2.net,value 595 finished server1.net,value 600 finished server4.net,value 597 connecting to server3.net 597 finished server3.net,value

Hope this helps!


The way forward always starts with a minimal test.

Replies are listed 'Best First'.
Re^2: script hanging at thread start [MCE::Flow alternative]
by armcinto (Initiate) on Nov 25, 2020 at 13:23 UTC
    Thanks! It will take me some time to learn MCE, but that looks promising.

      Kinda code reuse

      «The Crux of the Biscuit is the Apostrophe»

      perl -MCrypt::CBC -E 'say Crypt::CBC->new(-key=>'kgb',-cipher=>"Blowfish")->decrypt_hex($ENV{KARL});'Help

Re^2: script hanging at thread start [MCE::Flow alternative]
by Anonymous Monk on Dec 03, 2020 at 00:33 UTC
    how does it not use threads?

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://11124174]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (3)
As of 2021-01-22 01:08 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Notices?