diff -r 000000000000 -r 3e07fef1e154 testexecfw/tef/test/regressiontest/console/testdata/ctelnet.pl --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/testexecfw/tef/test/regressiontest/console/testdata/ctelnet.pl Mon Mar 08 15:03:44 2010 +0800 @@ -0,0 +1,31 @@ +# +# 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 Net::Telnet; + +$telnet = new Net::Telnet ( Timeout=>30, Errmode=>'die'); +$telnet->open("192.168.0.3"); +$telnet->login("any", "any"); +@lines = $telnet->cmd("testexecute z:\\testdata\\scripts\\TEFLoggerTest.script"); +print @lines; +@lines = $telnet->cmd("copy c:\\logs\\testexecute\\tefloggertest.htm c:\\logs\\testexecute\\tefloggertestPIPSINI.htm "); +print @lines; +@lines = $telnet->cmd("copy c:\\backupTEFc.ini c:\\system\\data\\testexecute.ini"); +print @lines; +@lines = $telnet->cmd("copy c:\\backupTEFz.ini z:\\system\\data\\testexecute.ini "); +print @lines; +@lines = $telnet->cmd("del c:\\backupTEF*.ini "); +print @lines;