--- a/sbsv1_os/e32toolp/platform/cl_x86.pm	Mon Jun 21 16:57:06 2010 +0300
+++ b/sbsv1_os/e32toolp/platform/cl_x86.pm	Thu Sep 30 14:38:30 2010 +0800
@@ -42,7 +42,6 @@
 	PMEndSrcList
 );
 
-use strict;
 use Winutl;
 use cl_generic;
 use Genutl;
@@ -287,7 +286,7 @@
 	if ($DefFile and $BasicTrgType !~ /^IMPLIB$/io) {
 		&main::Output(
 #			call perl on the script here so nmake will die if there are errors - this doesn't happen if calling perl in a batch file
-			"\tperl -w -S efreeze.pl \$(EFREEZE_ALLOW_REMOVE) \"$DefFile\" \"\$(EPOCBLD)\\$ExportLibrary.def\" \n"
+			"\tperl -S efreeze.pl \$(EFREEZE_ALLOW_REMOVE) \"$DefFile\" \"\$(EPOCBLD)\\$ExportLibrary.def\" \n"
 		);
 	}
 	&main::Output(
@@ -400,7 +399,7 @@
 		"CLEAN$Bld : CLEANBUILD$Bld CLEANRELEASE$Bld\n",
 		"\n",
 		"CLEANBUILD$Bld : \n",
-		"\t\@perl -w -S ermdir.pl \"\$(EPOCBLD$Bld)\"\n",
+		"\t\@perl -S ermdir.pl \"\$(EPOCBLD$Bld)\"\n",
 		"\t-\$(ERASE) \"$BLDTRGPATH$BaseTrg.ILK\"\n",
 		"\n",
 		"CLEANRELEASE$Bld : CLEANGENERIC\n",
@@ -632,7 +631,7 @@
 	#		call makedef to reorder the export information
 			&main::Output(
 	#			call perl on the script here so nmake will die if there are errors - this doesn't happen if calling perl in a batch file
-				"\tperl -w -S makedef.pl $AbsentSubst -Inffile \"\$(EPOCBLD$Bld)\\$ExportLibrary.inf\""
+				"\tperl -S makedef.pl $AbsentSubst -Inffile \"\$(EPOCBLD$Bld)\\$ExportLibrary.inf\""
 			);
 			if (-e $DefFile) { # effectively "if project frozen ..."
 				&main::Output(