$Src_Cmd = "srvrmgr – g $GATEWAY –e $ENTERPRISE_SERVER –s $USER –p $PASSWD –c Run Task for comp $SYSTEM_NAME processName=\"UDA Batch Deployment\", "RowId=$row_id"; #Subroutine to invoke the command sub Command_exe { ($COMMAND) = @_; print "Command to execute=$COMMAND\n"; $ret = system($COMMAND); if($ret == 0) { print "command executed successfully\n"; return 0; } else { print "Command Failed\n";return 1; } return 0; } #main------- $ret = Command_exe("$Src_Cmd"); # invoke the command line. print "ret code=$ret\n";