Perlでfile引数を指定してJARファイルを実行する

私は今でも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);

スクリプトは、実行時に入力ファイルを渡すように見えません。私は間違って何をしていますか?

私が得ることができる助けのために前もってありがとう。

1

1 答え

Perlでファイルを開いてはいけません。ファイル名を(引数として)Javaに渡してください:

my @args = ("java", "-jar", "nyfile.jar", $ARGV[0]);
2
追加された
これは本当にうまくいった。どうもありがとうございました!
追加された 著者 urbanspr1nter,