Changeset 14083
- Timestamp:
- Jul 9, 2007, 11:05:03 AM (19 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/detrend_reject_exp.pl (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/detrend_reject_exp.pl
r14048 r14083 276 276 } 277 277 278 ## add the summary statistics, and request a new iteration if needed 278 279 $command = "$dettool -adddetrunsummary"; 279 280 $command .= " -det_id $det_id"; … … 281 282 $command .= " -accept" if $master; 282 283 $command .= " -dbname $dbname" if defined $dbname; 284 $command .= " -again" unless $stop; 283 285 284 286 # add in the elements from the selected stats above … … 298 300 exit($error_code); 299 301 } 300 301 $command = "$dettool -updatedetrun -det_id $det_id";302 if ($stop) {303 $command .= ' -state stop';304 } else {305 $command .= ' -again';306 }307 $command .= " -dbname $dbname" if defined $dbname;308 309 ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =310 run(command => $command, verbose => 1);311 unless ($success) {312 $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);313 warn("Unable to perform dettool -updatedetrun: $error_code");314 exit($error_code);315 }316 302 } else { 317 303 print "skipping command: $command\n";
Note:
See TracChangeset
for help on using the changeset viewer.
