[請益] Net::Telnet
最近在研究 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
推
10/26 11:42, , 1F
10/26 11:42, 1F
→
10/26 11:43, , 2F
10/26 11:43, 2F
→
10/26 12:15, , 3F
10/26 12:15, 3F
Perl 近期熱門文章
PTT數位生活區 即時熱門文章
