[請益] Net::Telnet

[xatier (新生)]

最近在研究 Net::Telnet 這個模組

想寫一個能判斷 BBS 畫面的程式

目前大概弄像這樣的東西

#!/usr/bin/perl

use warnings;
use Net::Telnet;
use Encode;
$|++;
system("clear");

my $t = new Net::Telnet(Timeout => 100);
$t->open("hostname");
$t->waitfor(encode("Big5", decode("utf8", '/您的帳號/')));
$t->print("myuserid");
$t->print("password");


到這邊為止，我能成功登入 BBS 站台

但是我不知道要如何處理 BBS 傳回來的畫面

根據 CPAN 庫的說明
http://search.cpan.org/~jrogers/Net-Telnet-3.03/lib/Net/Telnet.pm

我有 getline 和 getlines 這兩種方法可以用

可是我用 getline 後我就沒有辦法看到我之前已經 getline 過的行

這樣一來，我無法做出判斷螢幕內容而和 BBS 伺服器端互動的功能



有方法可以取得整個螢幕畫面嗎?



--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 140.113.24.32
推 dm4:BBS 的螢幕畫面不是一行一行傳回來的，如果要取得整個螢幕畫面
→ dm4:的話，要把收到的資料照著 *[K *[H *[x;yH 排好
→ xatier:什麼意思，可否再說清楚一點@@?