|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Kirill Solomko 2:5020/400 21 Nov 2001 09:49:53 To : Igor Belokopytov Subject : Re: SNMP, getnext -------------------------------------------------------------------------------- Igor Belokopytov <bigus@cadvision.com> wrote: > Hi2All ! > > Приведите, плиз, кто-нибудь пример кода, распечатывающего при помощи getnext > (класс SNMP) > какую-нибудь ветку МИБа, ну например > ".1.3.6.1.2.1.interfaces.ifTable.ifEntry.ifDescr" > У меня на вот таком коде > > use SNMP; > > my $host = "localhost"; > my $community = "public"; > my $mib_path = ".1.3.6.1.2.1.interfaces.ifTable.ifEntry.ifDescr"; > > my $session = new SNMP::Session(DestHost => $host, UseLongNames => 1, > Community => $community); > my $vars = new SNMP::Varbind([$mib_path]); > > for(my @vals = $session->getnext($vars); $vars->[0]->tag =~ /ifDescr/ > and not $session->{ErrorStr}; @vals = $session->getnext($vars)) > { > print $vars->[0]->tag, "\n"; > } > > или даже если вместо for(...) {...} просто "@vals = > $session->getnext($vars);" > > вываливается в "сегментайшн фолт". Просто get работает, а getnext ... > > Linux, Debian 2.2 , snmpd (4.2.1-6 NET SNMP) > > Regards, > Igor Belokopytov > > > Были похожие проблемы (правда по-моему с walk) на Mandrake 7.2 с версией 4.2.1. С 4.1.x все было ok. Hint: Попробуй версию 4.1.x, 4.2.x по-моему в некоторых местах криво работает. Хотя на RH 7.1 все ok. -- With best wishes, Puma [PUMA-RIPE] --- ifmail v.2.15dev5 * Origin: Unknown (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/9138ae04767c.html, оценка из 5, голосов 10
|