Changeset 9892 for trunk/ippScripts/scripts/detrend_resid.pl

Timestamp:

Nov 7, 2006, 10:38:05 AM (20 years ago)

Author:

Paul Price

Message:

Output images from ppImage are specified by the FILERULES in the camera configuration.

File:

• trunk/ippScripts/scripts/detrend_resid.pl (modified) (4 diffs)

trunk/ippScripts/scripts/detrend_resid.pl

@@ -20 +20 @@
 
 my ($det_id, $iter, $exp_tag, $class_id, $det_type, $detrend,
-        $input_uri, $no_update);
+        $input_uri, $camera, $no_update);
 GetOptions(
     'det_id|d=s'        => \$det_id,
     'iteration=s'       => \$iter,
-    'exp_tag|e=s'        => \$exp_tag,
+    'exp_tag|e=s'       => \$exp_tag,
     'class_id|i=s'      => \$class_id,
     'det_type|t=s'      => \$det_type,
     'detrend=s'         => \$detrend,
     'input_uri|u=s'     => \$input_uri,
+    'camera|c=s'        => \$camera,
     'no-update'         => \$no_update
 ) or pod2usage( 2 );
@@ -34 +35 @@
 pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV;
 pod2usage(
-    -msg => "Required options: --det_id --iteration --exp_tag --class_id --det_type --detrend --input_uri",
+    -msg => "Required options: --det_id --iteration --exp_tag --class_id --det_type --detrend --camera --input_uri",
     -exitval => 3,
 ) unless defined $det_id
@@ -42 +43 @@
     and defined $det_type
     and defined $detrend
-    and defined $input_uri;
+    and defined $input_uri
+    and defined $camera;
+
+$ipprc->define_camera($camera);
 
 # Recipes to use, as a function of the detrend type
@@ -84 +88 @@
 $input_uri = File::Spec->rel2abs( $input_uri, $ipprc->workdir() );
 $detrend = File::Spec->rel2abs( $detrend, $ipprc->workdir() );
-my $outputName = $outputRoot . '.' . $class_id . '.fits'; # Name for 
+
+my $outputName = $ipprc->filename("PPIMAGE.OUTPUT", $outputRoot, $class_id);
+my $bin1Name =  $ipprc->filename("PPIMAGE.BIN1", $outputRoot, $class_id);
+my $bin2Name =  $ipprc->filename("PPIMAGE.BIN2", $outputRoot, $class_id);
+
 my $outputStats = $outputRoot . '.' . $class_id . '.stats';
-my $bin1Name = $outputRoot . '.' . $class_id . '.b1.fits';
-my $bin2Name =  $outputRoot . '.' . $class_id . '.b2.fits';
 
 # Run ppImage