Just another Perl shrine | |
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
Use Net::Telnet;
print "Enter IP"; my $var=<STDIN>; chomp $var; print "Enter User"; my $user=<STDIN>; chomp $user; print "Enter Password"; my $pass=<STDIN>; chomp $pass; #$telnet = new Net::Telnet->new( Timeout=>100,Prompt => '/\$%#> $/'); $telnet = new Net::Telnet->new( Timeout=>100 ); $telnet->open($var); $telnet->login($user,$pass); #SAMPLE copy $telnet->cmd("echo $1 > file"); $telnet->close; This is my script but not fullfill my task... I will be giving the ip address, username and passward. After connecting i will be update an winnt file... Then logoff,thats all,After that i will doing some other manipulation in local. In reply to Re^2: connect to a remote ip
by chennaiite
|
|