diff -r 000000000000 -r 8e480a14352b messagingfw/msgtestfw/group/machinename.pl --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/messagingfw/msgtestfw/group/machinename.pl Mon Jan 18 20:36:02 2010 +0200 @@ -0,0 +1,27 @@ +# Copyright (c) 2005-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 Win32; + +my $computer; +$computer=Win32::NodeName(); +$machineName = lc($computer); + +$fileName = "\\epoc32\\winscw\\c\\msgtest\\MachineName.txt"; +open(FILE, "> " . $fileName); + +# Write settings to output files +print FILE "$machineName"; +close(FILE); \ No newline at end of file