Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses

Re^2: connect to a remote ip

by chennaiite (Sexton)
on Aug 19, 2005 at 05:30 UTC ( #485021=note: print w/ replies, xml ) Need Help??

in reply to Re: connect to a remote ip
in thread Reaped: connect to a remote ip

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 );
#SAMPLE copy
$telnet->cmd("echo $1 > file");
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.

Comment on Re^2: connect to a remote ip

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://485021]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (5)
As of 2015-11-29 13:04 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (750 votes), past polls