Changeset 9004 for trunk/ippScripts/scripts/detrend_process.pl
- Timestamp:
- Sep 27, 2006, 9:35:47 AM (20 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/detrend_process.pl (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/detrend_process.pl
r8983 r9004 22 22 'det_type|t=s' => \$det_type, 23 23 'input_uri|u=s' => \$input_uri, 24 'output_uri|o=s' => \$output_uri,25 24 ) or pod2usage( 2 ); 26 25 27 26 pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV; 28 27 pod2usage( 29 -msg => "Required options: --det_id --exp_id --class_id --det_type --input_uri --output_uri",28 -msg => "Required options: --det_id --exp_id --class_id --det_type --input_uri", 30 29 -exitval => 3, 31 30 ) unless defined $det_id … … 33 32 and defined $class_id 34 33 and defined $det_type 35 and defined $input_uri 36 and defined $output_uri; 34 and defined $input_uri; 37 35 38 36 # Recipes to use, as a function of the detrend type … … 41 39 'dark' => 'PPIMAGE_OB', # Overscan and bias only 42 40 'flat' => 'PPIMAGE_OBD', # Overscan, bias and dark only 43 };44 45 # Prefix to add to filenames46 use constant PREFIX => {47 'bias' => 'o', # Overscan only48 'dark' => 'ob', # Overscan and bias only49 'flat' => 'obd', # Overscan, bias and dark only50 41 }; 51 42 … … 61 52 my $recipe = RECIPES->{$det_type}; 62 53 die "Unrecognised detrend type: $det_type\n" if not defined $recipe; 63 die "Unrecognised detrend type: $det_type\n" if not defined PREFIX->{$det_type};64 54 65 55 ### Output file name --- must match camera configuration! 66 my $outputRoot = PREFIX->{$det_type} . '_' . $output_uri;56 my $outputRoot = $exp_id . '.detproc' ; 67 57 my $outputName = $outputRoot . '.' . $class_id ; 68 my $outputImage = $outputName . '.fit ';58 my $outputImage = $outputName . '.fits'; 69 59 my $outputStats = $outputName . '.stats'; 70 60
Note:
See TracChangeset
for help on using the changeset viewer.
