java - 在 Perl 中使用文件参数执行 JAR 文件

Question

我目前仍在学习 Perl，并一直在尝试让 Perl 脚本正常工作。

这是一个简单的脚本，它执行 Java JAR 文件，并将文本文件作为输入参数作为其配置文件。

例如，如果我要在命令行中正常执行 jar:

java -jar myfile.jar sometextfile.txt

我想在 Perl 中执行此操作。到目前为止，我已经:

open(INPUT, "<$ARGV[0]");

my @args = ("java", "-jar", "nyfile.jar", INPUT);
system(@args);

close(INPUT);

脚本执行时似乎没有传递输入文件。我做错了什么？

预先感谢您提供的任何帮助。

Answer 1

不要在 Perl 中打开文件，只需将文件名(作为参数)传递给 Java:

my @args = ("java", "-jar", "nyfile.jar", $ARGV[0]);