topic Re: Parallel Programming with Perl in Operating System - Linux

Parallel Programming with Perl

Kalin Evtimov — Mon, 06 Feb 2006 05:22:36 GMT

Hello!
I want to write a programm, which should run a command, count 15 minutes and check the status. If the command is still running, it should be canceled.
However, I found out, that waiting 15 mins with sleep() doesn't bring anything, since it runs in the same thread.
What would be a nice approach to implement an independant clock?
Running it in a parallel thread is ok, but only if the machine has multiple CPU's. Otherwise threads are run one after the other.

Re: Parallel Programming with Perl

Arunvijai_4 — Mon, 06 Feb 2006 05:28:12 GMT

Hello,

You can probably use Parallel-ForkManager to start with.

http://search.cpan.org/~dlux/Parallel-ForkManager-0.7.5/ForkManager.pm

-Arun

Re: Parallel Programming with Perl

Arunvijai_4 — Mon, 06 Feb 2006 05:33:18 GMT

Hi Again,

Also, this link http://www.unix.org.ua/orelly/perl/prog3/ch17_01.htm

-Arun

Re: Parallel Programming with Perl

H.Merijn Brand (procura — Mon, 06 Feb 2006 05:43:38 GMT

use alarm ()

the process will then receive an ALARM signal after that time, but the process can do whatever it wants in thr meantime.

# perldoc -f alarm

will describe it, and supply you with an example

Enjoy, Have FUN! H.Merijn

Re: Parallel Programming with Perl

Steven E. Protter — Mon, 06 Feb 2006 05:47:00 GMT

Shalom Kalin

http://earth.e-raist.com/~raistlin/coding.html

You need to create an independent child process

http://bfr.caseywest.com/archives/005438.html

The child must be independent of its parent and run regardless of the status of the parent.

Be careful you can really tie up a system with this.

SEP

Re: Parallel Programming with Perl

Hein van den Heuvel — Mon, 06 Feb 2006 06:59:10 GMT

Using Alarm is a geat suggestion, but is in this particular example, why not go for the standard 'fork'.
Specifically used the forked thread to run the main code. The parent receives the pid for the child and can poke and prod it after sleeping for a while.

> Be careful you can really tie up a system with this.

Not with a simple fork.

> Running it in a parallel thread is ok, but only if the machine has multiple CPU's. Otherwise threads are run one after the other.

Not true. _every_ OS scheduler knows how to run more than 1 thread, making it seem like there is more than one cpu. It does this first and foremoste by exploiting wait time (your sleep, newtowrok wait, disk wait). But even if those threads are 100% cpu bound (not your case), it can and will timeslice to allow more tahn one thread a slice of cpu time.

Cheers,
Hein.

Re: Parallel Programming with Perl

Kalin Evtimov — Tue, 07 Feb 2006 07:38:23 GMT

In this context, how can I run a command from a perl-programm, say "sleep 15", but call it in a way, that the perl-programm doesn't wait for the "sleep 15", but go on.
system() waits for the call, exec() ends the current script, and qw() does the same as system().

Do I have any other alternative here?

Thank you!

Re: Parallel Programming with Perl

Kalin Evtimov — Tue, 07 Feb 2006 07:54:34 GMT

OK, fork() did it for me, thanks to everybody!