我可以在Perl的反引號中執行多行命令嗎？

Question

在Unix中，我有一個我想用nohup運行的進程。然而，這個過程將在某個時候等待提示，我必須輸入yes或no才能繼續。到目前爲止，在Unix中我一直在做以下

nohup myprocess <<EOF 
y 
EOF 

所以我使用的nohup和管道與文件「Y」，然後關閉該文件啓動進程的myprocess「。上面的行實際上是三個獨立的命令 - 即我在UNIX的第一行中輸入，然後在輸入'y'後輸入'y'，然後按回車鍵，最後輸入'EOF'並再次返回。

我想知道在Perl中執行此操作，但我不確定如何執行此命令，因爲它在三行以上。我不知道以下是否會起作用....

my $startprocess = `nohup myprocess <<EOF & 
y 
EOF 
` 

請幫忙 - 謝謝！

Answer 1

我認爲你的建議將按原樣工作。如果沒有，請嘗試用管替換重定向：

my $startprocess = `(echo "y" | nohup myprocess) &`; 

此外，根據爲什麼你正在做一個nohup，請看看下面的純Perl的daemonizing方式使用Proc::Daemon：How can I run a Perl script as a system daemon in linux?

Answer 2

Expect爲互動節目也可以使用。