从perl调用java类而不使用系统

我在服务器端有一个java代码，它在客户端调用perl，perl在客户端调用一个java类进行验证。在服务器端，我希望在客户端java类中构造字符串类型的输出消息。要在perl中调用java类，我调用如下

 my $command = $java . ' -classpath ' . $classpath . ' ' . $secOptions . ' ' . $className . ' ' . $serviceUrl . ' ' . $composites;
print `$command`;

---

perl可以在没有系统命令的情况下调用java吗？问题是一些消息正在打印，这些消息打印在java类中。我想从java类中分配输出，并对其进行解析，然后发送回我的服务器端。很难从您的问题中准确地判断您想要做什么，但这可能会奏效

open(my $program, "$command|") or die "$command $!";  #open program on a pipe
my @results=();
while(<$program>) {
  push @results,$_;  # store output
}

open（我的$program，“$command |”）或die“$command$！”#在管道上打开程序
我的@results=（）；
while（）{
推送@results，$#存储输出
}

有关其他选项，请参见perldoc perlipc

可能的副本