Changeset 16752 for trunk/ippScripts/scripts/warp_skycell.pl

Timestamp:

Feb 28, 2008, 5:02:12 PM (18 years ago)

Author:

Paul Price

Message:

Need to create the output directory

File:

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

trunk/ippScripts/scripts/warp_skycell.pl

@@ -132 +132 @@
 # Get list of filenames
 my $outrootResolved = $ipprc->file_resolve( $outroot );
-my ($imageFile,  $imageName)  = tempfile( caturi($outrootResolved, "$tess_id.$skycell_id.wrp$warp_id.image.list.XXXX"),  UNLINK => !$save_temps);
-my ($maskFile,   $maskName)   = tempfile( caturi($outrootResolved, "$tess_id.$skycell_id.wrp$warp_id.mask.list.XXXX"),   UNLINK => !$save_temps);
-my ($weightFile, $weightName) = tempfile( caturi($outrootResolved, "$tess_id.$skycell_id.wrp$warp_id.weight.list.XXXX"), UNLINK => !$save_temps);
-my ($astromFile, $astromName) = tempfile( caturi($outrootResolved, "$tess_id.$skycell_id.wrp$warp_id.astrom.list.XXXX"), UNLINK => !$save_temps);
+my ($imageFile,  $imageName)  = tempfile( "$outrootResolved.image.list.XXXX"),  UNLINK => !$save_temps);
+my ($maskFile,   $maskName)   = tempfile( "$outrootResolved.mask.list.XXXX"),   UNLINK => !$save_temps);
+my ($weightFile, $weightName) = tempfile( "$outrootResolved.weight.list.XXXX"), UNLINK => !$save_temps);
+my ($astromFile, $astromName) = tempfile( "$outrootResolved.astrom.list.XXXX"), UNLINK => !$save_temps);
 
 foreach my $imfile (@$imfiles) {