在運行批處理腳本的Perl中，腳本需要STDIN

Question

在Windows中，我想在perl中運行批處理腳本。 這個批處理腳本需要用戶提供兩個輸入，但是我希望這些輸入來自perl腳本。 我試過做回聲| 批處理腳本，但僅適用於一種輸入。 目前，我正在像這樣實現它：

chdir "C:\\folder\\folder\\folder";
`some batch script`;
`echo variable`;
`echo filename`;

我嘗試的另一種方式：

chdir "C:\\folder\\folder\\folder";
`echo variable | some batch script`;
`echo filename`;

變量和文件名是腳本在繼續之前提示輸入的兩個輸入。 都不行。 任何幫助。 謝謝

Answer 1

腳本從stdin中讀取：

my $script_out = qx(printf "%s\n" variable filename | script.sh);