Thực thi lệnh Nohup với đầu vào

Trong UNIX, tôi có một quy trình mà tôi muốn chạy bằng nohup. Tuy nhiên, quá trình này sẽ có lúc chờ tại một dấu nhắc mà tôi phải nhập yeshoặc nođể nó tiếp tục. Cho đến nay, trong UNIX tôi đã làm như sau:

nohup myprocess <<EOF
y
EOF

Vì vậy, tôi bắt đầu quá trình 'my process' bằng cách sử dụng nohup và pipe trong một tệp có 'y' sau đó đóng tệp. Các dòng trên đây thực sự là ba lệnh riêng biệt - tức là tôi nhấn enter trên dòng đầu tiên trong UNIX, sau đó tôi nhận được một lời nhắc nơi tôi nhập 'y' và sau đó nhấn enter để cuối cùng nhập 'EOF' và nhấn trở lại. Vì vậy, điều này hoạt động hoàn hảo, nhưng vấn đề của tôi là dưới đây.

Bây giờ tôi muốn thực hiện điều này trong Perl, nhưng tôi không chắc làm thế nào tôi có thể thực hiện lệnh này, vì nó có hơn ba dòng. Tôi không biết nếu những điều sau đây sẽ hoạt động:

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

Nếu bạn chỉ muốn viết một yđoạn cho stdin của tiến trình, bạn có thể làm điều này:

(echo y | nohup myprocess) &

Nếu bạn muốn tiếp tục viết ycho mọi dấu nhắc xuất hiện, coreutil yestồn tại cho chính xác mục đích này - nó sẽ tiếp tục viết bất cứ điều gì bạn nói với nó về thiết bị xuất chuẩn. Mặc định của nó là xuất "y", vì vậy bạn chỉ có thể:

(yes | nohup myprocess) &

nhưng nếu bạn cần một cái gì đó khác, bạn có thể vượt qua nó như một đối số