Jmx4Perl 为 Perl 语言提供了用来访问 Java 企业版基于 JMX 的管理接口的方法。它需要在 Java 应用中安装一个大约 30k 的代理接口，提供基于 HTTP/JSON 的访问 JMX MBeans 的方法。

示例代码：

   my $jmx = new JMX::Jmx4Perl(url => "http://localhost:8080/j4p-agent");
   my $request = new JMX::Jmx4Perl::Request(type => READ_ATTRIBUTE,
                                            mbean => "java.lang:type=Memory",
                                            attribute => "HeapMemoryUsage",
                                            path => "used");
   my $response = $jmx->request($request);
   print "Memory used: ",$response->value(),"n";

您可能感兴趣的文章: