Discussion :

[michon]

Bonjour,

Debutant en Perl, je dois effectuer des requetes SNMP vers un switch pour recuperer certaines valeurs via la MIB Cisco. Cette partie se passe assez bien puisque la connection a l'air de fonctionner, mais je ne parvient pas a afficher les informations lu (par exemple la bande passante de l'interface, ou la temperature etc...). Si je regarde le contenu de la variable "result", elle contient 0 ou 1, ce qui correspond au retour de la commande a ce que j'ai pu comprendre.

Comment faire pour connaitre la valeur de la donnee que je check ?

voici le code :

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
20
21
22
23
24
25
26
27
 
#! /usr/local/bin/perl
 
use strict;
use warnings;
use Net::SNMP;
 
my $OID = '1.3.6.1.2.1.2.2.1.5';
 
my ($session, $error) = Net::SNMP->session(
	-version		=> 'snmpv2c',
	-nonblocking	=> 1,
	-hostname		=> shift || '192.168.90.100',
	-community	=> shift || 'public',
	-port			=> shift || 161
);
 
my $result = $session->get_request(-varbindlist => [$OID],);
 
if(!defined $result){
	printf "ERROR: %s.\n", $session->error();
	$session->close();
	exit 1;
}
 
$session->close();
exit 0;

Ici un :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

print $result;

me renvoit la valeur 0 ou 1

et si je tente un :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

print $result->{$OID};

j'obtient l'erreur suivante :

Can't use string ("1") as a HASH ref while "strict refs" in use at /root/workspace/Plugin Nagios/test_SNMP2.pl line 24.

la ligne 24 etant la ligne correspondant au

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

print $result->{$OID};

Quelqu'un peut-il m'aider ?

En vous remerciant,
Michon

[Beniou]

Bonjour,

Je n'ai jamais utilisé ce module mais en regardant la doc sur CPAN, je pense avoir une idée.

Ta commande get_request te retourne un booléen (0 ou 1) car tu es en mode non bloquant, en mode bloquant ta méthode marcherait.

Regarde du côté des exemples 3 et 4 de la doc CPAN (http://search.cpan.org/~dtown/Net-SN...MP.pm#EXAMPLES) pour voir comment récupérer ton résultat car ce n'est pas pareil si tu es en mode bloquant ou non bloquant.

[Schmorgluck]

J'ai trouvé pareil que Beniou. Plus précisément, quand tu crées ta session, tu indiques -nonblocking => 1,, tu es donc en mode non-bloquant.

[michon]

En effet, en passant en mode bloquant cela fonctionne...
Je pense que dans un premier temps je vais faire ainsi, du moins le temps de réussir a afficher les résultats en non-bloquant, car j'ai du mal a comprendre vraiment les exemples sur CPAN, surement a cause de mon manque de pratique du langage.

Si je parvient a faire marcher la chose en non-bloquant, je posterais la solution. En attendant, le mode bloquant me débloque (joli jeu de mot pas voulu...)

Merci à vous 2 pour vos réponses.