Perl Requires Chilkat v11.6.0+
Perl
Get the Last JSON-RPC Response from an MCP Server
See more MCP Client Examples
Demonstrates Mcp.GetLastJsonData, which returns the complete JSON-RPC response envelope (the jsonrpc, id, and result members) from the most recent request into a JsonObject.
Tip: Code to parse the returned JSON can be generated with Chilkat's online tool at https://tools.chilkat.io/jsonParse.
Background. This exposes the full protocol-level response for inspection or debugging after any MCP request.
Chilkat Perl Downloads
use chilkat();
$success = 0;
$mcp = chilkat::CkMcp->new();
# Connect to a public MCP (Model Context Protocol) server over its Streamable HTTP endpoint. The
# Microsoft Learn MCP server is public and requires no authentication.
$success = $mcp->Connect("https://learn.microsoft.com/api/mcp");
if ($success == 0) {
print $mcp->lastErrorText() . "\r\n";
exit;
}
# Perform an MCP request.
$toolsResult = chilkat::CkJsonObject->new();
$success = $mcp->ListTools($toolsResult);
if ($success == 0) {
print $mcp->lastErrorText() . "\r\n";
exit;
}
# Get the complete JSON-RPC response envelope (the jsonrpc, id, and result members) from the most
# recent request.
$json = chilkat::CkJsonObject->new();
$mcp->GetLastJsonData($json);
$json->put_EmitCompact(0);
print $json->emit() . "\r\n";
# JSON parsing code for this result can be generated at Chilkat's online tool:
# https://tools.chilkat.io/jsonParse