Changeset 19261
- Timestamp:
- Aug 28, 2008, 10:02:01 AM (18 years ago)
- Location:
- trunk/ippScripts/scripts
- Files:
-
- 4 edited
-
camera_exp.pl (modified) (2 diffs)
-
detrend_norm_exp.pl (modified) (1 diff)
-
detrend_process_exp.pl (modified) (1 diff)
-
detrend_resid_exp.pl (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/camera_exp.pl
r18723 r19261 154 154 155 155 ### not needed to have such an extensive temp file name. 156 my ($list1File, $list1Name) = tempfile( " $exp_tag.cm.$cam_id.b1.list.XXXX", UNLINK => !$save_temps ); # For binning 1157 my ($list2File, $list2Name) = tempfile( " $exp_tag.cm.$cam_id.b2.list.XXXX", UNLINK => !$save_temps ); # For binning 2158 my ($list3File, $list3Name) = tempfile( " $exp_tag.cm.$cam_id.b3.list.XXXX", UNLINK => !$save_temps ); # For astrometry156 my ($list1File, $list1Name) = tempfile( "/tmp/$exp_tag.cm.$cam_id.b1.list.XXXX", UNLINK => !$save_temps ); # For binning 1 157 my ($list2File, $list2Name) = tempfile( "/tmp/$exp_tag.cm.$cam_id.b2.list.XXXX", UNLINK => !$save_temps ); # For binning 2 158 my ($list3File, $list3Name) = tempfile( "/tmp/$exp_tag.cm.$cam_id.b3.list.XXXX", UNLINK => !$save_temps ); # For astrometry 159 159 160 160 # XXX we perform astrometry iff photometry output exists … … 277 277 my $camdir = $ipprc->dvo_cameradir(); # Camera directory for addstar 278 278 my $command; 279 $command = "$addstar - D CAMERA $camdir -update";279 $command = "$addstar -image -D CAMERA $camdir -update"; 280 280 $command .= " -D CATDIR $dvodbReal"; 281 281 -
trunk/ippScripts/scripts/detrend_norm_exp.pl
r18562 r19261 118 118 } 119 119 120 my ($list1File, $list1Name) = tempfile( " $camera.$det_type.norm.$det_id.$iter.b1.list.XXXX", UNLINK => !$save_temps );121 my ($list2File, $list2Name) = tempfile( " $camera.$det_type.norm.$det_id.$iter.b2.list.XXXX", UNLINK => !$save_temps );120 my ($list1File, $list1Name) = tempfile( "/tmp/$camera.$det_type.norm.$det_id.$iter.b1.list.XXXX", UNLINK => !$save_temps ); 121 my ($list2File, $list2Name) = tempfile( "/tmp/$camera.$det_type.norm.$det_id.$iter.b2.list.XXXX", UNLINK => !$save_temps ); 122 122 foreach my $file (@$files) { 123 123 print $list1File ( $ipprc->filename( "PPIMAGE.BIN1", $file->{path_base}, $file->{class_id} ) . "\n"); -
trunk/ippScripts/scripts/detrend_process_exp.pl
r18562 r19261 122 122 123 123 # File lists for the two binnings 124 my ($list1File, $list1Name) = tempfile( " $exp_tag.detproc.$det_id.b1.list.XXXX", UNLINK => !$save_temps );125 my ($list2File, $list2Name) = tempfile( " $exp_tag.detproc.$det_id.b2.list.XXXX", UNLINK => !$save_temps );124 my ($list1File, $list1Name) = tempfile( "/tmp/$exp_tag.detproc.$det_id.b1.list.XXXX", UNLINK => !$save_temps ); 125 my ($list2File, $list2Name) = tempfile( "/tmp/$exp_tag.detproc.$det_id.b2.list.XXXX", UNLINK => !$save_temps ); 126 126 foreach my $file (@$files) { 127 127 print $list1File ($ipprc->filename( "PPIMAGE.BIN1", $file->{path_base}, $file->{class_id} ) . "\n"); -
trunk/ippScripts/scripts/detrend_resid_exp.pl
r18562 r19261 158 158 159 159 # XXX in debug mode, unlink = 0 160 my ($list1File, $list1Name) = tempfile( " $exp_tag.detresid.$det_id.$iter.b1.list.XXXX", UNLINK => !$save_temps );161 my ($list2File, $list2Name) = tempfile( " $exp_tag.detresid.$det_id.$iter.b2.list.XXXX", UNLINK => !$save_temps );160 my ($list1File, $list1Name) = tempfile( "/tmp/$exp_tag.detresid.$det_id.$iter.b1.list.XXXX", UNLINK => !$save_temps ); 161 my ($list2File, $list2Name) = tempfile( "/tmp/$exp_tag.detresid.$det_id.$iter.b2.list.XXXX", UNLINK => !$save_temps ); 162 162 foreach my $file (@$files) { 163 163 print $list1File ($ipprc->filename( "PPIMAGE.BIN1", $file->{path_base}, $file->{class_id} ) . "\n");
Note:
See TracChangeset
for help on using the changeset viewer.
