Hello,
I am using the telnet server that comes with win2k. The authentication level is set to "0" clear text. I can't seem to get the following script to work, the script fails at line 10 with the following error message:
"command timed-out at test.pl line 10"
Has anybody been successful using net::telnet with win2k's built telnet server?
use Net::Telnet;
$telnet = new Net::Telnet(Timeout=>4,
Errmode=>'die');
$telnet->open('testmachine.com');
$telnet->waitfor('/login: $/i');
$telnet->print('user');
$telnet->waitfor('/password: $/i');
$telnet->print('password');
$telnet->waitfor(/"c:>\\"/);
@lines = $telnet->cmd("dir\n"); #line 10
print @lines;
perl -v
This is perl, v5.6.1 built for MSWin32-x86-multi-thread
_________________
Eric Logeson
919-680-5679
www.dukece.com
