Index: /trunk/ippScripts/scripts/phase2.pl
===================================================================
--- /trunk/ippScripts/scripts/phase2.pl	(revision 11951)
+++ /trunk/ippScripts/scripts/phase2.pl	(revision 11952)
@@ -82,7 +82,10 @@
 }
 
+$workdir = File::Spec->catfile( $workdir, $exp_tag );
+system "mkdir -p $workdir" unless -d $workdir;
+
 ### Output file name --- must match camera configuration!
 my $outputFile =  "$exp_tag.p2";
-my $outputRoot = File::Spec->catfile( $workdir, $exp_tag, $outputFile );
+my $outputRoot = File::Spec->catfile( $workdir, $outputFile );
 my $outputImage = $ipprc->filename("PPIMAGE.OUTPUT", $outputRoot, $class_id);
 my $outputBin1 = $ipprc->filename("PPIMAGE.BIN1", $outputRoot, $class_id);
Index: /trunk/ippScripts/scripts/phase3.pl
===================================================================
--- /trunk/ippScripts/scripts/phase3.pl	(revision 11951)
+++ /trunk/ippScripts/scripts/phase3.pl	(revision 11952)
@@ -129,4 +129,5 @@
     $workdir = $dir;
 }
+system "mkdir -p $workdir" unless -d $workdir;
 
 # make this a function which generates a specific list file for a specific filename
@@ -134,5 +135,5 @@
 # Generate the file list, and get the statistics
 my $outputFile =  "$exp_tag.p3";
-my $outputRoot = File::Spec->catfile( $workdir, $exp_tag, $outputFile );
+my $outputRoot = File::Spec->catfile( $workdir, $outputFile );
 
 my $list1Name = $outputRoot . '.b1.list'; # Name for the input file list for binning 1
@@ -145,4 +146,6 @@
 open my $list2File, '>' . $list2Name;
 open my $list3File, '>' . $list3Name;
+
+print "$list1Name $list2Name $list3Name\n";
 
 my $chipObjects;