Changeset 9145 for trunk/ippScripts/scripts/detrend_norm_apply.pl

Timestamp:

Oct 3, 2006, 10:04:48 AM (20 years ago)

Author:

Paul Price

Message:

Fixing so they compile.

File:

• trunk/ippScripts/scripts/detrend_norm_apply.pl (modified) (2 diffs)

trunk/ippScripts/scripts/detrend_norm_apply.pl

@@ -56 +56 @@
 my $b1name = $outputRoot . '.' . $classId . '.b1.fits'; # Output file with binning 1
 my $b2name = $outputRoot . '.' . $classId . '.b2.fits'; # Output file with binning 2
-my $statName = $outputRoot . '.' . $classId . '.stats'; # Statistics file
+my $statsName = $outputRoot . '.' . $classId . '.stats'; # Statistics file
 
 # Run ppArith
 {
-    my $command = "$ppImage -file $input $outputRoot -norm $value -stat $statName -recipe PPIMAGE " . RECIPE(); # Command to run
+    my $command = "$ppImage -file $input $outputRoot -norm $value -stat $statsName -recipe PPIMAGE " . RECIPE(); # Command to run
     my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
         run(command => $command, verbose => 1);
@@ -67 +67 @@
     die "Can't find expected output file: $b1name\n" if not -e $b1name;
     die "Can't find expected output file: $b2name\n" if not -e $b2name;
-    die "Can't find expected output file: $statName\n" if not -e $statName;
+    die "Can't find expected output file: $statsName\n" if not -e $statsName;
 }