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

InvokePerl

You use the InvokePerl keyword to execute a Perl file.

Signature

InvokePerl supports the following signature:

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

where:

• Select Machine is the Siebel Server or the Test Harness machine.

  Siebel Server reads the server credentials from the XML file and executes the Perl file on the server machine. The Test Harness machine executes the script name in the Perl file locally.

• @VAR/String[String1,String2....N are the supported variables or strings passed to the Perl file.
• @Output Variable is the supported variable obtained from the Perl file.

Declaring PerlExecStatus in the Perl File

You must declare the PerlExecStatus variable in the Perl file. For example, at the end of the Perl file, print the PerlExecStatus as follows:

print"PerlExecStatus = $PerlExecStatus";

Use the following syntax in the Perl file to save a value to PerlExecStatus:

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

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

print"perlexecstatus = $PerlExecStatus";

Test Harness Folder Structure

The Perl file to be executed must be placed in the invokePerl folder on the Test Harness machine.

The Exefiles folder must be placed on the Test Harness Machine.

INI File Structure

An eample of the INI file structure is as follows:

[SERVER]

SERVER_MACHINE=macine-name

----SERVER_MACHINE will be passed as $ARGV[0] to the perl file

SERVER_LOGIN=ORADEV\\userid|password

----SERVER_LOGIN will be passed as $ARGV [1]&& $ARGV [2] to the perl file

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

DBSERVER_LOGIN=SADMIN|MSSQL

----DBSERVER_Login will be passed as $ARGV [8]&& $ARGV [9] to the perl file

CLIENT_MACHINE=machinename

----CLIENT_MACHINE will be passed as $ARGV [10] to the perl file-TestHarness Path $ARGV[11]

ENTSERVER_AND_PORT=servername:port

----ENTSERVER_AND_PORT will be passed as $ARGV[12]

SERVER_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]

[PERLPATH]

PERL_PATH= \\\\servername\\install\\PERL_UTILS\\Perl1\\bin\\perl.exe

Examples

The following table describes how to use the InvokePerl keyword when configuring Siebel Tools and Siebel Server.