diff -r 000000000000 -r 05e9090e2422 skins/AknSkins/group/editmakefile.pl --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/skins/AknSkins/group/editmakefile.pl Thu Dec 17 09:14:12 2009 +0200 @@ -0,0 +1,38 @@ +# +# Copyright (c) 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: +# +#print "$ARGV[0]\n"; +#print "$ARGV[1]\n"; +#print "$ARGV[2]\n"; + +open(FILE, "$ARGV[0]") or die "can't open file $ARGV[0] : $!\n"; +while ($line = ) + { + $line = "$ARGV[2]\n" if $line =~ /^$ARGV[1]/; + push(@newfile, $line); + }; + +close(FILE); +#print "finished reading file.... now writing to file\n"; +open(FILE2, ">$ARGV[0]") or die "can't write to file $ARGV[0] : $!\n"; +foreach $part (@newfile) + { + print FILE2 "$part"; +#print "$part"; + }; +close(FILE2); + +#print "FINISHED \n"; +