Changeset 19284

Timestamp:

Aug 28, 2008, 7:47:31 PM (18 years ago)

Author:

bills

Message:

/tmp/$tess_id.$the_rest may be invalid if $tess_id is a path with
multiple components. Use basename to make a legal path

File:

• trunk/ippScripts/scripts/stack_skycell.pl (modified) (2 diffs)

trunk/ippScripts/scripts/stack_skycell.pl

@@ -20 +20 @@
 use Data::Dumper;
 use File::Temp qw( tempfile );
+use File::Basename;
 use PS::IPP::Config 1.01 qw( :standard );
 
@@ -120 +121 @@
 
 # Generate MDC file with the inputs
-my ($listFile, $listName) = tempfile( "/tmp/$tess_id.$skycell_id.stk.$stack_id.list.XXXX", UNLINK => !$save_temps );
+my $tess_base = basename($tess_id);
+my ($listFile, $listName) = tempfile("/tmp/$tess_base.$skycell_id.stk.$stack_id.list.XXXX", UNLINK => !$save_temps );
 my $num = 0;
 my $inputSources;               # Sources to use as stamps