Telnet to a remote host : Telnet « Network « Perl

1. Perl
2. Network
3. Telnet

Telnet to a remote host

    

use Net::Telnet;

$telnet = Net::Telnet->new
( 
    Timeout => 90,
    Prompt  => '%', 
    Host => 'server.com' 
);

$telnet->login('username', 'password');

$telnet->cmd("cd folder1");

@listing = $telnet->cmd("ls");

print "Here are the files:\n";
print "@listing";

$telnet->close;

   
    
    
    
  

Related examples in the same category