Bonjour,
Je souhaite actuellement interroger la MIB d'un routeur Cisco en SNMP depuis un script PERL.
Le probleme c'est que je débute en Perl et que mon script ne fonctionne pas :s . Je n'ai pas pu trouver beaucoup d'exemple d'interrogation de mib depuis Perl et la syntaxe que j'emploi et sans doute fausse.
Voila à quoi ressemble cette partie de mon script actuellement.
Si quelqu'un à une idée pour me dépanner c'est volontier
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 # Informations de connexion en snmp my ($sesnmp, $error) = Net::SNMP->session( -hostname => $iprouteur, -community => shift || 'public', ); if (!defined($sesnmp)) { printf("ERROR: %s.\n", $error); exit 1; } my $versionIOS = '1.3.6.1.2.1.1.1.0'; { # Requete snmp my @output3 = $sesnmp->get_request(-versionIOS=> $versionIOS); print "@output3\n"; }![]()
Partager