作者godman362 (青)
看板Perl
標題[問題] 擷取system輸出資料
時間Sun Nov 1 13:23:59 2009
目前我使用system去執行某個外部指令
而輸出的部份,要由使用者選擇之後決定
我想
直接將輸出的值丟入自己宣告的變數之中
而不是透過輸出至某個檔案後再讀出
請問一下這個部份應該如何處理,還請各位指點一下,謝謝
目前我的作法如下:
open(MenuValue,"|dialog --menu \"Data Choose : \" 40 30 6 1 \"Monday\" \\
2 \"Tuesday\" \\
3 \"Wednesday\" \\
4 \"Thursday\" \\
5 \"Friday\" ");
我想將取得的值,放入MenuValue中
不過卻沒有辦法讓我選擇就結束程式了
所以想請問各位有沒有可以解決的辦法?
--------------------自行解決辦法如下:-------------------------
my $MenuDialog = "dialog --stdout --menu \"Data Choose:\" 40 30 6 ....."
my $pid = open2(\*Read, \*Write, $MenuDialog);
do {
$kid = waitpid($pid, 0);
} while $kid > 0;
<Read> 即為所要值--
要
感謝的人太多了,那就
謝天吧
要
改得程式碼太多了,那就
改天吧
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 122.118.8.22
※ 編輯: godman362 來自: 122.118.8.22 (11/01 13:40)
※ 編輯: godman362 來自: 122.118.8.22 (11/01 14:42)
1F:→ godman362:以自行解決,解決方式已經附上 11/01 14:42