Index: trunk/ippScripts/scripts/warp_skycell.pl
===================================================================
--- trunk/ippScripts/scripts/warp_skycell.pl	(revision 12115)
+++ trunk/ippScripts/scripts/warp_skycell.pl	(revision 12218)
@@ -92,5 +92,9 @@
     $workdir = $dir;
 }
-my $outputFile = "$skycell_id.warp.$warp_id"; # Root name
+
+$workdir = File::Spec->catfile( $workdir, "sky$skycell_id" );
+system "mkdir -p $workdir" unless -d $workdir;
+
+my $outputFile = "sky$skycell_id.wrp$warp_id"; # Root name
 my $outputRoot = File::Spec->catfile( $workdir, $outputFile );
 my $outputImage = $ipprc->filename("PSWARP.OUTPUT", $outputRoot, $skycell_id );