Changeset 9101

Timestamp:

Oct 2, 2006, 12:30:17 PM (20 years ago)

Author:

Paul Price

Message:

dettool change: -processed --> -processedimfile.

Location:

trunk/ippScripts/scripts

Files:

• detrend_norm_calc.pl (modified) (1 diff)
• detrend_stack.pl (modified) (1 diff)

trunk/ippScripts/scripts/detrend_norm_calc.pl

@@ -45 +45 @@
 my $files;                      # The input files
 {
-    my $command = "$dettool -processed -unmask -det_id $detId -iteration $iter"; # Command to run
+    my $command = "$dettool -processedimfile -unmask -det_id $detId -iteration $iter"; # Command to run
     my @command = split /\s+/, $command;
     my ( $stdin, $stdout, $stderr ); # Buffers for running program
     print "Running [$command]...\n";
     run \@command, \$stdin, \$stdout, \$stderr or
-        die "Unable to perform dettool -processed -unmask on detrend $detId/$iter: $?";
+        die "Unable to perform dettool -processedimfile -unmask on detrend $detId/$iter: $?";
     print $stdout . "\n";
     

trunk/ippScripts/scripts/detrend_stack.pl

@@ -64 +64 @@
 my $files;                      # Array of files to be stacked
 {
-    my $command = "$dettool -processed -det_id $det_id -iteration $iter -class_id $class_id"; # Command to run
+    my $command = "$dettool -processedimfile -det_id $det_id -iteration $iter -class_id $class_id"; # Command to run
     my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
         run(command => $command, verbose => 1);
-    die "Unable to perform dettool -processed: $error_code\n" if not $success;
+    die "Unable to perform dettool -processedimfile: $error_code\n" if not $success;
     my $metadata = $mdcParser->parse(join "", @$stdout_buf)
         or die "unable to parse metadata config doc";