perl script one: $client->open(); $cmd = { "name" => "connect", }; execute_command($cmd); $cmd = { "name" => "setBreakpointByLineNo", "fileName" => "SCHM.c", "lineNo" => "292", }; execute_command($cmd); # Execute program. $cmd = { "name" => "run", }; execute_command($cmd); # We are done now. $client->close(); perl script two: $client->open(); $cmd = { "name" => "setBreakpointByLineNo", "fileName" => "SCHM.c", "lineNo" => "309", }; execute_command($cmd); # Execute program. $cmd = { "name" => "run", }; execute_command($cmd); # Read clock. $cmd = { "name" => "readClock", }; execute_command($cmd); # We are done now. $client->close();