Net::Telnet的一个问题！

liuke432

我需要telnet到一款设备（innomedia）上，输入一些命令，配置一些参数。
但是只有第一个命令Cu管用，第二个p就不管用了,返回 Invalid Command。

提示符有： 空，UserID>, 等。不知是不是我的Prompt设置的不对。 请高手指教！   ：）

1. 
   
2. #!/usr/local/bin/perl
   
3. 
   
4. use strict;
   
5. use Telnet();
   
6. 
   
7. my $ip = "10.90.1.230";
   
8. 
   
9. my $username = "Admin";
   
10. my $passwd = "password";
    
11. 
    
12. my $telnet = new Net::Telnet(Timeout => 10, Prompt => '/[\$%#>] $|[\$%#>]\s*/');
    
13. $telnet->open($ip);
    
14. $telnet->login($username,$passwd);
    
15. my @line1 = $telnet->cmd("Cu");
    
16. print @line1;               
    
17. my @line2 = $telnet->cmd("p");
    
18. print @line2;
    

复制代码

ytlvy

会不会 每个命令都要登录一次啊，或者说那个登录在执行完一个命令 后就断开链接了。还是你那个命令本来就是错的咧～！～～～～～～

Lonki

你的Prompt => '/[\$%#>] $|[\$%#>]\s*/'是没有必要设置的(完全重复), 因为默认是'/[\$%#>] $/'
从错误提示看你应该检察下命令"p"是否存在, 手动运行下.

liuke432

原帖由 ytlvy 于 2007-10-25 17:38 发表
会不会 每个命令都要登录一次啊，或者说那个登录在执行完一个命令 后就断开链接了。还是你那个命令本来就是错的咧～！～～～～～～

我明天试一下这种方式，Thanks！

liuke432

原帖由 Lonki 于 2007-10-25 17:53 发表
你的Prompt => '/[\$%#>] $|[\$%#>]\s*/'是没有必要设置的(完全重复), 因为默认是'/[\$%#>] $/'
从错误提示看你应该检察下命令"p"是否存在, 手动运行下.

命令“p”确实没问题，在运行“p”这个命令的时候，他的提示符是"UserID>",会不会没匹配到呢？

apile

原帖由 liuke432 于 2007-10-25 19:48 发表

命令“p”确实没问题，在运行“p”这个命令的时候，他的提示符是"UserID>",会不会没匹配到呢？

看有没有debug mode...
把他打开...
应该是没匹配到在等timeout...
建议你只匹配
> $

少用\s*
可以用\s?

hotren

不会跟我的问题一样吧，CU命令是不是结果是分屏显示的？一直等到timeout

liuke432

原帖由 apile 于 2007-10-26 09:38 发表

看有没有debug mode...
把他打开...
应该是没匹配到在等timeout...
建议你只匹配
> $

少用\s*
可以用\s?

只匹配> $结果一样。

手工telnet上去之后，输入Cu，会一下全部显示出来结果，
在程序中，输入Cu，一次回不全，必须象下面一样：
才能全部取回来。

1. 
   
2. my @line1 = $telnet->cmd("Cu");
   
3. print @line1;
   
4. my @line2 = $telnet->cmd("/n");
   
5. print @line2;
   

复制代码

其中，cmd("/n") 换成别的命令也管用，例如cmd("p")也可以把剩余的取回来。

按理说，输入Cu后，下一个命令的提示符是 “UserID>”.  但输入cmd("Cu");cmd("/n")后，
好像把UserID也取回来了。 是不是这里出了问题？

liuke432

原帖由 hotren 于 2007-10-28 11:07 发表
不会跟我的问题一样吧，CU命令是不是结果是分屏显示的？一直等到timeout

手工telnet上去，输入Cu，结果一次全部返回，在程序中，输入Cu，一次只能取回一部分。

hotren

先$obj->cmd("terminal length 0")一下，然后再$obj->cmd("cu")
就是不知道你这个设备有没有terminal length 命令！

再不行就用expect吧！