--- a/build_package.pl	Wed Jul 15 18:14:05 2009 +0100
+++ b/build_package.pl	Wed Jul 15 18:16:13 2009 +0100
@@ -88,6 +88,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";