diff --git a/test/scripts/build.pl b/test/scripts/build.pl
index 163470e..2df077b 100644
--- a/test/scripts/build.pl
+++ b/test/scripts/build.pl
@@ -17,6 +17,8 @@ my %job = Jobs::get($inifile, $jobname);
 given ($job{'Platform'}) {
 	
 	when ("Win7") {
+	
+		$scriptdir =~ s/\//\\/g; # replace / -> \
 		
 		# construct a build command	
 		if ($job{'ToolChain'} eq "mingw") {