Account:admin


Password: *****

 User login successful, expired time is "Unlimited".



Type ? for command help


> wan vdsl show basic

VDSL

Link Status:	Showtime

Firmware Version:	1414c3

VDSL Profile:	17a

Basic	Status	Upstream	Downstream	Unit

Actual Data Rate:	 13320 	 39961 	 Kb/s

SNR:	 69 	 42 	 0.1dB

> 

##</code><code>##

#!/usr/bin/perl
 
use Net::Telnet;

my $telnet = Net::Telnet->new(Input_log => 'telnet.log');
 
$telnet->open('192.168.1.1');
$telnet->waitfor('/Account:/');
$telnet->print('admin');
$telnet->waitfor('/Password:/');
$telnet->print('admin');

sleep(1);

$telnet->waitfor('/>/');
my @lines = $telnet->cmd('wan vdsl show basic');


#print @lines;
$telnet->close;