Changeset 16283 for trunk/pstamp/scripts/pstamp_dorequest.pl

Timestamp:

Feb 1, 2008, 5:42:05 PM (18 years ago)

Author:

bills

Message:

get web page working again with job sequencing through the database

File:

• trunk/pstamp/scripts/pstamp_dorequest.pl (modified) (4 diffs)

trunk/pstamp/scripts/pstamp_dorequest.pl

@@ -16 +16 @@
 my $request_id = $ARGV[0];
 
-my $verbosity = 0;
+my $verbosity = 1;
 
 use Sys::Hostname;
@@ -78 +78 @@
         if ($job->{req_id} == $request_id) {
             # there must be a better way to do this
+            print STDERR "adding $job->{job_id} to the list\n";
             $psjobs[@psjobs] = $job;
         }
@@ -90 +91 @@
 
 foreach my $job (@psjobs) {
-    my $command = "echo $ppstamp_run $job->{job_id}";
+    my $command = "$ppstamp_run $job->{job_id}";
     my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
         run(command => $command, verbose => $verbosity);
@@ -100 +101 @@
 
 #
-# set the state of the request to stop
+# Update the state of the request
 #