perl Net::Telnet 模块问题，win7 系统上怎么使用？

哈比小豆

#!/usr/bin/perl
use Net::Telnet;
my $os_ip="10.245.53.81";
my $t=new Net::Telnet(Timeout => 10,port => 23,Errmode => "die",Prompt => '/\$ $/i');
#my $telnet = new Net::Telnet (Timeout => 5,port=> 23, Errmode => "die", Prompt => '/\$ $/i');
$t->open(Host => $os_ip, Timeout => 5,Errmode => "return");
$t->login("Administrator","Aa1");
@lines=$t->cmd("who");
print @lines;

我想用本地模块登录服务器，并且show一下当前登录的用户，出现这个报错，请大神帮忙解决一下，谢谢！！！

login failed: filehandle isn't open at telnet.pl line 7

quanpai

login failed，登录不成功啊