Je souhaite faire un telnet sur un équipement réseaux, et ensuite executer la commande show cdp neighbors pour avoir la liste des voisins. J'ai un script pour cela, mais il me retourne le resultat 1 au lieu de la liste des interfaces. Pouvez vous m'aider à corriger cela svp ?
Voici mon script :
Merci par avance pour votre aide
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 !/usr/bin/perl use Net::Telnet; $telnet = new Net::Telnet ( Timeout=>10,Errmode=>'die'); $telnet->open('10.10.10.10'); $telnet->waitfor('/Username: $/i'); $telnet->print('user'); $telnet->waitfor('/password: $/i'); $telnet->print('MDP'); #$telnet->waitfor('/router1#/i'); $telnet->waitfor('/#$/i'); $telnet->print('show cdp neighbors'); $output = $telnet->waitfor('/#$/i'); print $output;
Partager