The code you posted only shows that you constructed an object. You need to now call some methods to execute commands. From the Net::Telnet::Cisco SYNOPSIS:

use Net::Telnet::Cisco;
 
my $session = Net::Telnet::Cisco->new(Host => '123.123.123.123');
$session->login('login', 'password');
 
# Execute a command
my @output = $session->cmd('show version');
print @output;
[download]