Testing Siebel Business Applications > Keywords Reference > Keywords Supporting Tools and Server Configuration >

InvokePerl

Executes a perl file.

Signature supported:

InvokePerl(Select Machine|scriptname.pl:@VAR/String[String1,String2....N]/NULL|Output Variable)

Select Machine::SiebelServer Machine or TestHarness Machine :SiebelServer Reads server credentials from xml file and executes the Perl file on Server Machine.

TestHarness Machine:Executes the perl file locally.

Scriptname.pl:: Perl script to be executed .

@VAR/String[String1,String2....N:: Variable support or Strings to be passed to the perl file.

@Output Variable:: Variable support to get the value from the perl file.

NOTE:  User should declare a variable PerlExecStatus in the perl file .

End of the Perl file user should print the PerlExecStatus in the PerlFile.(as below example).

print"PerlExecStatus = $PerlExecStatus";

To save value into a variable , please use the syntax in the perl File.

print"\@invokePerl1=$ARGV[1].";

print"\@invokePerl2=$ARGV[0].";

print"perlexecstatus = $PerlExecStatus";

Pre-requisite:

Folder Structure: All the user defined perl files and cmd.txt for execution should be placed in Resources/invokePerl Folder in TestHarness.

The exe files folder should be placed in the framework\exe in TestHarness.

Update the following tags in config.xmlSIEBEL-SERVER-NAME=macihne-name ----SERVER_MACHINE will be passed as $ARGV [0] to the perl file

SIEBEL-SERVER-MACHINE-LOGIN-ID=userid ----SERVER_LOGIN will be passed as $ARGV [1] to the perl file

SIEBEL-SERVER-MACHINE-PASSWORD=pwd ----SERVER_LOGIN will be passed as $ARGV [2] to the perl file

SIEBEL-SERVER-OS-TYPE=WINDOWS ----SERVER_OS_TYPE will be passed as $ARGV [3] to the perl file

SERVER-DB-TYPE=MSSQL ----SERVER_DB_TYPE will be passed as $ARGV [4] to the perl file

SERVER_DB_NAME=dbname ----SERVER_DB_NAME will be passed as $ARGV [5] to the perl file

DBSERVER-AND-PORT=dbserver,port ----DBSERVER_AND_PORT will be passed as $ARGV [6] to the perl file

DB-TABLE-OWNER=XYZ ----DB_TABLE_OWNER will be passed as $ARGV [7] to the perl file

DB-SERVER-LOGIN=SADMIN|MSSQL ----DBSERVER_Login will be passed as $ARGV [8]&& $ARGV [9] to the perl file

TEST-MACHINE-NAME=machinename ----CLIENT_MACHINE will be passed as $ARGV [10] to the perl file

----------- ----TestHarness Path $ARGV[11]

SIEBEL-GATEWAY-PORT=servername:port ----ENTSERVER_AND_PORT will be passed as $ARGV[12]

SERVER-INSTALLATION-PATH ----C:\\23044\\ses\\siebsrvr\\BIN ----SERVER INSTALLATION PATH will be passed as $ARGV[13]

------------- ----Exefiles folder location will be passed as $ARGV[14]

Variable passed from script ----Will be passed as $ARGV[15]

[PERL-PATH]

Ex: PERL-PATH= \\\\servername\\install\\PERL_UTILS\\Perl1\\bin\\perl.exe

Examples: