Salut,

Je cherche à recuperer des informations contenues dans la Mib d'un routeur en SNMP.

Voici une partie du code que j'utilise:


# Informations de connexion en snmp
my ($sesnmp, $error) = Net::SNMP->session(
-hostname => $iprouteur,
-username => 'username',
-password => 'password'

);

if (!defined($sesnmp)) {
printf("ERROR: %s.\n", $error);
exit 1;
}

my $versionIOS = '1.3.6.1.2.1.1.1.0';

# Requete snmp
my $result = $sesnmp->get $versionIOS
print "$result\n"

# Liberation des ressources
$session->close;
$sesnmp->close;


La syntaxe semble erronée, le script ne fonctionne et j'ai un mal fou à trouver des exemple de script d'interrogation d'une MIB en Perl...

Si quelqu'un en connait ou sait me dire ce qui ne va pas dans mon script, ce serait sympa !

Merci à ceux qui ont lu jusqu'ici ! lol Configuration: Windows XP
Internet Explorer 6.0