如何实现Net：：Telnet 获取top指令信息

gwconan

如题：代码如下：
    use Net::Telnet ();
    $host = new Net::Telnet ( Timeout =>; 10,
                              Prompt =>; '/[\%\$\#\>;] $/');
    $host->;open("10.245.101.230";

    $host = eval{
      $host->;login("sybase", "sybase123";
      return $host;
    };

    if($@) {
        print " XXXX $@\n";
    } else {
        @lines = $host->;cmd("top";
        print @lines;

        ？？？？？code here

    }

问题列表如下：
      1 . 对于类似top的指令而言，他是一直执行的，如何让cmd不超时？
      2 . 如果指令的结果是不停吐出的信息，如何一次读取一行信息？
      3 . 如果指令的结果是不定时的外吐，如何实现读取？
********************     thenks     **********************

apile

建議不要用top...
你可以用個loop..定時去抓一些cmd的結果...
top其實也是一堆cmd的整合罷了...
如果一定要用top...建議你用expect...
上面的問題都可以迎刃而解...只是expect..在parsing這類的
text..很複雜...

suoweiwei

如果主机没有用户名和密码或只有密码该怎样登录呀，急呀

suoweiwei

如果主机没有用户名和密码或只有密码该怎样登录呀，急呀

lc1111

只有用户名没有密码！ 急！

多谢！请教！

apile

看不懂...請先研究一下Net::Telnet與你自己登錄的過程....
比較一下..自然就知道怎麼做了....