请问如何在su中自动输入密码？

kongge_1

su 命令运行后会要求输入密码
请问如何让perl自动输入那
参照了Expect 模块 我写了下面这段代码但是总是得不到要的root

1. 
   
2. use Expect;
   
3. $delay=1;
   
4. $cmd="su root";
   
5. $pass="passwd";
   
6. $exp=Expect->;spawn($cmd);
   
7. $exp->;send_slow($delay,"$pass");
   

复制代码

运行总还是是现在的用户，并没有跳到root.
请问那里出了问题

apile

因為root's Password: 還沒出來..你就把密碼給他...
當然不行啦...雖然你用delay...但是還是會少一兩位元...
多看看Expect 的說明吧....