求助：perl/cgi & shell I/O

megalomania

我是屬於perl/linux菜鳥的那種，還請大家多多關照。

  通過perl/cgi執行shell命令，例如：“ftp 192.168.1.1”。
  如果直接用system，在ftp命令後就I/O直接中斷了。
  *如何保持當前I/O,取得處理的結果採取下步的動作？

  *或者通過其他辦法，從web通過perl/cgi可以對系統進行一些設置，有什麽通常的做法嗎？

----------------------------------------------------------在線恭候

megalomania

已經24小時過去了。
是不是我問的問題太低極了，沒有人願意回答。

apile

Net::Ftp module..通常要透過 perl的一些modules..來做這件事情...
事情沒有你想像的容易....

megalomania

thanx，perl真是博大精深。
另外，如果我要做adduser,cp,reboot。等操作，是不是一般都可以找到對應的module？

perl中有沒有專門針對這些常用操作的module？

apile

應該有..但是我用不到....
還是直接連上系統用指令新增刪除user..會比較好...
用其他方式..太危險了點...

megalomania

這些是一個WUI應用的一部分，主要是爲不怎麽了解linux管理的人提供方便親切一點的統一管理界面。

數據傳送甚至連加密都沒有，確實是很危險。不過客戶的式樣就是這樣的了，也沒有別的辦法。

謝謝aPile。

apile

你可以到CPAN上找找...
http://search.cpan.org
Perl有相當多且完整的modules可供使用...
在系統管理部分Webmin..就是用perl寫的...
其他還有相當多的軟件也是用perl寫的...

我懂的只是其中一小部分....:)

QBQ战鹰

解决这个问题需要使用管道操作，使用的不是system,而是open!
open(handle,"ftp 192.168.1.1|";
while(<handle>{
......
}

megalomania

在系統管理部分Webmin..就是用perl寫的...

謝謝各位，我想我找到需要的了

megalomania

通過perl/cgi執行shell命令，例如：“ftp 192.168.1.1”。
如果直接用system，在ftp命令後就I/O直接中斷了。
*如何保持當前I/O,取得處理的結果採取下步的動作？

tty交互的部分，在这里用管道实现确实可行，另外对于telnet这样的指令，也可以管道实现的。

只是对于su这样的指令，简单的管道实现好像被做掉了，它会报错“只能从tty取得输入”。我尝试expect这样的工具，觉得它反应速度实在比较慢（是不是有办法设置？）。
谁知道有什么办法实现su这样的指令的代码交互。至少expect底层实现了这样的功能。perl 的，c 的，能解决问题就好。