On Sat, 2003-07-12 at 20:34, [EMAIL PROTECTED] wrote:
> This will work, but wont solve the problem of the alarm exiting the loop
> before the file has been totaly proccessed.
>
Seems to me that it is exactly what is wanted
> On Sat, 12 Jul 2003, Ramprasad wrote:
>
> > [EMAIL PROTECTED] wrote:
> > > I'm kind of new to Perl, so please forgive the question..
> > >
> > > I'm trying to use perl to read a file and then run a program using the
> > > file. I also want to use the alarm(x) function to skip to the next entry
> > > in the files if it times out. Here's what Ive go so far:
> > >
> > > open (TESTFILE, "< regression") || die "Can't open: regression_dgd\n";
> > > open (LOGFILE, "> regression.log") || die "Can't open: regression.log\n";
> > > print LOGFILE "\n\n\nStart of test run - $today1 $run\n";
> > > while ($line = <TESTFILE>)
> > > {
> > > alarm(62);
> > > print "Working...\n";
> > > $start=time;
> > > chomp($line);
> > > $cmd = "/node.ulm_bx";
> > > $full_line = join("",$line,$cmd);
> > > $jobrun = `$run $full_line`;
> > > print LOGFILE "$jobrun";
> > > $end = time;
> > > $totaltime = $end - $start;
> > > print LOGFILE "Time for test:$totaltime sec's\n\n\n";
> > > }
> > > close (TESTFILE);
> > > close (LOGFILE);
> > >
> > > It works fine, but when the alarm time gets exceeded, the script exits.
> > > What I would like it to do is just go to the next line in the TESTFILE.
> > >
> > > Thanks for any input you can give me..
> > >
> > > Denis
> > >
> >
> > Why dont you just reset the alarm after every run
> > eg
> >
> > $jobrun = `$run $full_line`;
> > alarm(0); # This will reset the alarm
> > print LOGFILE "$jobrun";
> >
> > I dont know if this work, because anyway you were resetting the alarm
> > in the next loop
> >
> > Ram
> >
> >
> >
> >
>
----------------------------------------------------------------
NETCORE SOLUTIONS *** Ph: +91 22 5662 8000 Fax: +91 22 5662 8134
MailServ: Email, IM, Proxy, Firewall, Anti-Virus, LDAP
Fleximail: Mail Storage, Management and Relaying
http://netcore.co.in
Emergic Freedom: Linux-based Thin Client-Thick Server Computing
http://www.emergic.com
BlogStreet: Top Blogs, Neighborhoods, Search and Utilities
http://www.blogstreet.com
Rajesh Jain's Weblog on Technology: http://www.emergic.org
----------------------------------------------------------------
