diff -r 000000000000 -r bde4ae8d615e os/ossrv/lowlevellibsandfws/pluginfw/Framework/MultipleImageTest/tools/scripts/EditH4hrpOby.pl
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/os/ossrv/lowlevellibsandfws/pluginfw/Framework/MultipleImageTest/tools/scripts/EditH4hrpOby.pl	Fri Jun 15 03:10:57 2012 +0200
@@ -0,0 +1,51 @@
+#!perl
+
+# Copyright (c) 2007-2009 Nokia Corporation and/or its subsidiary(-ies).
+# All rights reserved.
+# This component and the accompanying materials are made available
+# under the terms of "Eclipse Public License v1.0"
+# which accompanies this distribution, and is available
+# at the URL "http://www.eclipse.org/legal/epl-v10.html".
+#
+# Initial Contributors:
+# Nokia Corporation - initial contribution.
+#
+# Contributors:
+#
+# Description:
+#
+
+use strict;
+my $target = "\\epoc32\\rom\\include\\h4hrp.oby";
+
+# Read h4hrp.oby to see if it has already been modified.
+my @lines = ();
+my $lastEndIf;
+
+open(FH, $target) or die "Fail to open $target $!\n";
+while(<FH>)
+{
+  push(@lines, $_);
+  $lastEndIf = scalar(@lines) - 1 if (/#endif/i);
+  if (/\bLANGUAGE_CODE\s+0\d/i)
+  {
+    close(FH);
+	exit(0);
+  }
+}
+close(FH);
+
+chmod(0666, $target);
+open(FH, ">$target") or die "Fail to open $target for write $!\n";
+
+for (my $i = 0; $i < scalar @lines; $i++)
+{
+  if ($i == $lastEndIf)
+  {
+	print FH "\nDEFAULT_LANGUAGE 01\n";
+	print FH "LANGUAGE_CODE 02\n";
+	print FH "LANGUAGE_CODE 03\n\n";
+  }
+  print FH $lines[$i];
+}
+close(FH);