Changeset 25473
- Timestamp:
- Sep 21, 2009, 5:25:08 PM (17 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/ipp_cleanup.pl (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/ipp_cleanup.pl
r25442 r25473 345 345 } 346 346 } 347 if ($status) { 348 my @files = (); 349 # delete the temporary image datafiles 350 addFilename(\@files, "PSWARP.OUTPUT", $path_base, $skycell_id ); 351 addFilename(\@files, "PSWARP.OUTPUT.MASK", $path_base, $skycell_id); 352 addFilename(\@files, "PSWARP.OUTPUT.VARIANCE", $path_base, $skycell_id); 347 if ($status) { 348 if ($skyfile->{quality} != 8007) { 349 my @files = (); 350 351 # delete the temporary image datafiles 352 addFilename(\@files, "PSWARP.OUTPUT", $path_base, $skycell_id ); 353 addFilename(\@files, "PSWARP.OUTPUT.MASK", $path_base, $skycell_id); 354 addFilename(\@files, "PSWARP.OUTPUT.VARIANCE", $path_base, $skycell_id); 353 355 # addFilename(\@files, "PSWARP.OUTPUT.SOURCES", $path_base, $skycell_id); 354 355 if ($mode eq "goto_purged") { 356 # additional files to remove for 'purge' mode 357 addFilename(\@files, "PSWARP.BIN1", $path_base, $skycell_id ); 358 addFilename(\@files, "PSWARP.BIN2", $path_base, $skycell_id ); 359 addFilename(\@files, "SKYCELL.STATS", $path_base, $skycell_id ); 360 # addFilename(\@files, "PSPHOT.PSF.SKY.SAVE", $path_base); 361 362 # XXX: do we want to delete these? 363 # addFilename(\@files, "TRACE.EXP", $path_base, $skycell_id); 364 # addFilename(\@files, "PSWARP.CONFIG", $path_base, $skycell_id); 365 } 356 if ($mode eq "goto_purged") { 357 # additional files to remove for 'purge' mode 358 addFilename(\@files, "PSWARP.BIN1", $path_base, $skycell_id ); 359 addFilename(\@files, "PSWARP.BIN2", $path_base, $skycell_id ); 360 addFilename(\@files, "SKYCELL.STATS", $path_base, $skycell_id ); 361 # addFilename(\@files, "PSPHOT.PSF.SKY.SAVE", $path_base); 362 363 # XXX: do we want to delete these? 364 # addFilename(\@files, "TRACE.EXP", $path_base, $skycell_id); 365 # addFilename(\@files, "PSWARP.CONFIG", $path_base, $skycell_id); 366 } 366 367 # actual command to delete the files 367 $status = &delete_files (\@files); 368 $status = &delete_files (\@files); 369 } 368 370 } 369 371
Note:
See TracChangeset
for help on using the changeset viewer.
