linux - 如何在 linux 中使用 perl 从显示的输出中提取数字

Question

# This Perl script open connection and call domains
# $jar stands for path of jmxterm jar file

open JMX, "| java -jar jmxterm-1.0-alpha-4-uber.jar -n"; // jmx jar file 
#print JMX "help \n";

my $host = "127.0.0.1"; // hostname
my $port = 7199; //jmx port number

print JMX "open $host:$port\n";
#print JMX "domains\n";
print JMX "domain org.apache.cassandra.request\n";
print JMX "bean type=ReadRepairStage\n";
print JMX "get CompletedTasks\n"; 
print JMX "close\n";
close JMX;

目前，我得到的输出为 CompletedTasks = 1234，我需要 1234。

Answer 1

您不能使用简单的open 来建立双向通信。参见 IPC::Open2了解更多。