--- a/sbsv1_os/e32toolp/bldmake/bldmake.pl	Mon Jun 21 16:57:06 2010 +0300
+++ b/sbsv1_os/e32toolp/bldmake/bldmake.pl	Thu Sep 30 14:38:30 2010 +0800
@@ -17,8 +17,6 @@
 # 
 #
 
-use strict;
-
 use FindBin;		# for FindBin::Bin
 use Getopt::Long;
 
@@ -1312,7 +1310,7 @@
 		"REM ** DO NOT EDIT **", 
 		"\n",
 		"\n",
-		"perl -w -S ABLD.PL \"${BldInfPath}\\\" %1 %2 %3 %4 %5 %6 %7 %8 %9\n",
+		"perl -S abld.pl \"${BldInfPath}\\\" %1 %2 %3 %4 %5 %6 %7 %8 %9\n",
 		"if errorlevel==1 goto CheckPerl\n",
 		"goto End\n",
 		"\n",
@@ -1427,7 +1425,7 @@
 	foreach $dir (@$ExpDirsRef) {
 		&Output(
 			"$dir :\n",
-			    "\t\@perl -w -S emkdir.pl \"\$\@\"\n",
+			    "\t\@perl -S emkdir.pl \"\$\@\"\n",
 			"\n"
 		);
 	}
@@ -1711,7 +1709,7 @@
 	
     &Output("\n# Directories \n\n");  
 	&Output(join (" \\\n", @dirs)." :")       
-	&Output("\n\t\@perl -w -S emkdir.pl \$@\n\n");			
+	&Output("\n\t\@perl -S emkdir.pl \$@\n\n");			
 		   		
 }
 
@@ -1991,7 +1989,7 @@
 			"\n",
 			"\n",
 			"STARTROMFILE :\n",
-			    "\t\@perl -w -S emkdir.pl \"", &Path_Chop($RomDir), "\"\n",
+			    "\t\@perl -S emkdir.pl \"", &Path_Chop($RomDir), "\"\n",
 			    "\t\@echo // $OutRomFile > $OutRomFile\n",
 			    "\t\@echo // >> $OutRomFile\n"
 		);
@@ -2094,7 +2092,7 @@
 				"\n",
 				"\n",
 				"MAKEFILE$$Ref{Base} :\n",
-				    "\tperl -w -S makmake.pl \$(NO_DEPENDENCIES) -D $$Ref{Path}$$Ref{Base} $Plat$FeatureVariant $build_as_arm_arg $bld_flags $cmp_wrap_flag\n",
+				    "\tperl -S makmake.pl \$(NO_DEPENDENCIES) -D $$Ref{Path}$$Ref{Base} $Plat$FeatureVariant $build_as_arm_arg $bld_flags $cmp_wrap_flag\n",
 
 				"\n",
 				"CLEANMAKEFILE$$Ref{Base} :\n",
@@ -2119,7 +2117,7 @@
 			foreach $Command (qw(CLEANALL)) {
 				&Output(
 					"CLEANALL$$Ref{Base} :\n",
-					"\tperl -w -S ermdir.pl $MakefilePath\n",
+					"\tperl -S ermdir.pl $MakefilePath\n",
 					"\n",
 				);
 			}