--- a/build_package.pl	Fri Jun 26 18:34:34 2009 +0100
+++ b/build_package.pl	Mon Jun 29 14:21:49 2009 +0100
@@ -75,6 +75,7 @@
 $sLabelBaseString =~ m,.*[\\/]([^\\^/]+),;
 my $sJobLabel = $1;
 $sJobLabel = $sLabelBaseString if (! $1);
+mkdir($sJOB_BASE_DIR) if (!-d$sJOB_BASE_DIR);
 my $sJobDir = mkdir_unique("$sJOB_BASE_DIR\\$sJobLabel");
 print "Created project dir $sJOB_BASE_DIR\\$sJobLabel\n";