在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]);