Beefy Boxes and Bandwidth Generously Provided by pair Networks DiBona
We don't bite newbies here... much
 
PerlMonks  

Re: require sugesstions for writing a perl script

by Anonymous Monk
on Mar 06, 2013 at 16:08 UTC ( #1022023=note: print w/ replies, xml ) Need Help??


in reply to require sugesstions for writing a perl script

Why not try to run 50 processes and then sleep for 20 seconds and again run 50 processes, sleep 20 sec. and etc.

for i in 1 2 3 4 5 . . . . . . 1000 do nohup validation.pl $i & if [ $i%50=0 ]; then sleep 20 fi done

Regards, Pavel Petrov


Comment on Re: require sugesstions for writing a perl script
Download Code
Re^2: require sugesstions for writing a perl script
by Anonymous Monk on Mar 06, 2013 at 16:37 UTC

    My mistake in comparison (bash is tricky). Correction:

    for i in 1 2 3 4 5 . . . . . . 1000 do nohup validation.pl $i & let j=($i%50) if [ $j -eq 0 ]; then sleep 20 fi done

    Regards, Pavel Petrov

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (9)
As of 2014-04-18 12:40 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (467 votes), past polls