thank you all.
On 3/15/06, Ad Ministrator <[EMAIL PROTECTED]> wrote:
>
> Sonika Sachdeva <[EMAIL PROTECTED]> wrote:
> >Hi,
> >thanks for the response,
> >
> >thats right , system function will block till the command is complete
> >
> >foreach $filename (@FILES) {
> >$retval = system("perl sample.p
Sonika Sachdeva <[EMAIL PROTECTED]> wrote:
>Hi,
>thanks for the response,
>
>thats right , system function will block till the command is complete
>
>foreach $filename (@FILES) {
>$retval = system("perl sample.pl $filename");
>if ($retval ==0 ) { print "success with $filename, output shd
>be $expe
Hi,
thanks for the response,
thats right , system function will block till the command is complete
foreach $filename (@FILES) {
$retval = system("perl sample.pl $filename");
if ($retval ==0 ) { print "success with $filename, output shd
be $expectedname.zip in the current working dir.";}
}
$retva
On 3/15/06, Sonika Sachdeva <[EMAIL PROTECTED]> wrote:
> $retval = system("perl sample.pl $filename");
> I would need a while loop to poll the "$?" for the complete execution of the
> system command.
No; system() waits for the command to complete before it continues.
You could use fork-and-wait,
Sonika Sachdeva wrote:
Hi,
Hello,
I need to run " perl sample.pl $filename " from a perl program . The output
is a zip file which needs to be processed further.
use Acme::Spork;
my $spid = spork(sub {
qx( 'perl sample.pl' . join('', @_) );
}, $filename) or die "Could not fork for sp
Hi,
I need to run " perl sample.pl $filename " from a perl program . The output
is a zip file which needs to be processed further.
Now the issues are:
1. this execution takes around 10-15 mins and i need to wait for it to
complete bfore i start the next execution with a new filename.
2. get hold
