Changeset 16283 for trunk/pstamp/scripts/ppstamp_run.pl
- Timestamp:
- Feb 1, 2008, 5:42:05 PM (18 years ago)
- File:
-
- 1 edited
-
trunk/pstamp/scripts/ppstamp_run.pl (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/pstamp/scripts/ppstamp_run.pl
r16280 r16283 96 96 } 97 97 98 my $jobStatus; 98 99 { 99 100 my $command = "$ppstamp -file $uri $outputBase $argString"; 100 101 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 101 102 run(command => $command, verbose => $verbosity); 102 ### 103 ### update the status of the job with the error 104 ### 105 unless ($success) { 106 die("Unable to perform $command: $error_code"); 103 104 if ($success) { 105 $jobStatus = "ok"; 106 } else { 107 $jobStatus = $error_code; 108 print STDERR "ppstamp failed with error code $error_code\n"; 107 109 } 110 # unless ($success) { 111 # die("Unable to perform $command: $error_code"); 112 # } 108 113 } 109 114 110 115 116 # stop the job and set the error status 111 117 { 112 my $command = "$pstamptool -processedjob -job_id $job_id -state stop -status ok";118 my $command = "$pstamptool -processedjob -job_id $job_id -state stop -status $jobStatus"; 113 119 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 114 120 run(command => $command, verbose => $verbosity); … … 119 125 120 126 121 exit 0;127 exit $jobStatus;
Note:
See TracChangeset
for help on using the changeset viewer.
