Changeset 11360 for trunk/ippScripts/scripts/detrend_stack.pl

Timestamp:

Jan 29, 2007, 7:37:37 AM (19 years ago)

Author:

eugene

Message:

update workdir and outroot names

File:

• trunk/ippScripts/scripts/detrend_stack.pl (modified) (1 diff)

trunk/ippScripts/scripts/detrend_stack.pl

@@ -100 +100 @@
 
 # Stack the files
-my $outputRoot = $camera . '.' . $det_type . '.' . $det_id . '.' . $iter . '.' . $class_id; # Root name
-$outputRoot = File::Spec->catfile( $workdir, $outputRoot );
+my $outputFile = "$camera.$det_type.$det_id.$iter.$class_id"; # Root name
+my $outputSubD = "$camera.$det_type.$det_id";
+my $outputRoot = File::Spec->catfile( $workdir, $outputSubD, $outputFile );
 my $outputStack = $outputRoot . '.fits'; # Output name
 my $outputStats = $outputRoot . '.stats'; # Statistics name
+
 {
     my $command = "$ppMerge $outputStack"; # Command to run