Schrift
Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl
[thread]6996[/thread]

snmpwalk: output verwenden....



<< |< 1 2 >| >> 17 Einträge, 2 Seiten
cheggler
 2005-05-16 13:58
#54969 #54969
User since
2005-05-16
7 Artikel
BenutzerIn
[default_avatar]
Hallo zusammen
Ich bin ein absoluter newbie in perl und habe absolut keine Ahnung....!! Habe mir aber sagen lassen, dass dies was ich machen möchte mit perl am bessten gehen würde...?
Nun.... ich möchte die uptime sämtlicher ethernet-ports auf einem switch in einer Tabelle (rangliste) darstellen. Welches Port wird am meisten gebraucht und welches gar nicht?

Die kann ich ganz einfach mit einem snmpwalk machen:

snmpwalk -v 1 -c public <ip-adress> ifLastChange

Aber wie kann ich den output in ein file umwandeln und diese Daten auswerten...??

please help me ;-))
renee
 2005-05-16 14:30
#54970 #54970
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
snmpwalk -v 1 -c public <ip-address> ifLastChange > filename.output
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
cheggler
 2005-05-16 14:36
#54971 #54971
User since
2005-05-16
7 Artikel
BenutzerIn
[default_avatar]
ja, soviel wusste ich auch schon... ;-)
aber ich möchte diesen snmpwalk periodisch (alle 2 Stunden) durchführen und diesen output verwenden, ohne dass ich jedes mal von hand die daten editieren und zusammenzählen muss.

ist das möglich?
renee
 2005-05-16 14:45
#54972 #54972
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Das periodische machst Du am besten über Cronjob.

Wenn Du den Output im Perl-Skript verwenden willst, machst Du am besten:
Code: (dl )
my $result = qx{snmpwalk -v 1 -c public <ip-address> ifLastChange};


Da ich snmpwalk nicht kenne, weiß ich nicht, was Du mit editieren und zusammenzählen meinst...
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
cheggler
 2005-05-16 14:52
#54973 #54973
User since
2005-05-16
7 Artikel
BenutzerIn
[default_avatar]
ich hab dir hier ein Beispiel-output. Hier habe ich einen snmpwalk auf einen 48-port switch gemacht. Die Uptime der verschiedenen Port zählt sich einfach hoch, seit dem letzten reboot.
Quote
IF-MIB::ifLastChange.1 = Timeticks: (219923100) 25 days, 10:53:51.00
IF-MIB::ifLastChange.2 = Timeticks: (291442830) 33 days, 17:33:48.30
IF-MIB::ifLastChange.3 = Timeticks: (0) 0:00:00.00
IF-MIB::ifLastChange.4 = Timeticks: (0) 0:00:00.00
IF-MIB::ifLastChange.5 = Timeticks: (291443150) 33 days, 17:33:51.50
IF-MIB::ifLastChange.6 = Timeticks: (413522130) 47 days, 20:40:21.30
IF-MIB::ifLastChange.7 = Timeticks: (0) 0:00:00.00
IF-MIB::ifLastChange.8 = Timeticks: (300617070) 34 days, 19:02:50.70
IF-MIB::ifLastChange.9 = Timeticks: (291443150) 33 days, 17:33:51.50
IF-MIB::ifLastChange.10 = Timeticks: (219981820) 25 days, 11:03:38.20
IF-MIB::ifLastChange.11 = Timeticks: (219999180) 25 days, 11:06:31.80
IF-MIB::ifLastChange.12 = Timeticks: (301946910) 34 days, 22:44:29.10
IF-MIB::ifLastChange.13 = Timeticks: (220033420) 25 days, 11:12:14.20
IF-MIB::ifLastChange.14 = Timeticks: (221288170) 25 days, 14:41:21.70
IF-MIB::ifLastChange.15 = Timeticks: (24179410) 2 days, 19:09:54.10
IF-MIB::ifLastChange.16 = Timeticks: (516433680) 59 days, 18:32:16.80
IF-MIB::ifLastChange.17 = Timeticks: (516419040) 59 days, 18:29:50.40
IF-MIB::ifLastChange.18 = Timeticks: (516431600) 59 days, 18:31:56.00
IF-MIB::ifLastChange.19 = Timeticks: (543368960) 62 days, 21:21:29.60
IF-MIB::ifLastChange.20 = Timeticks: (468715520) 54 days, 5:59:15.20
IF-MIB::ifLastChange.21 = Timeticks: (0) 0:00:00.00
IF-MIB::ifLastChange.22 = Timeticks: (505795440) 58 days, 12:59:14.40
IF-MIB::ifLastChange.23 = Timeticks: (508682160) 58 days, 21:00:21.60
IF-MIB::ifLastChange.24 = Timeticks: (531186240) 61 days, 11:31:02.40
IF-MIB::ifLastChange.25 = Timeticks: (543026560) 62 days, 20:24:25.60
IF-MIB::ifLastChange.26 = Timeticks: (540585440) 62 days, 13:37:34.40
IF-MIB::ifLastChange.27 = Timeticks: (567193920) 65 days, 15:32:19.20
IF-MIB::ifLastChange.28 = Timeticks: (543360160) 62 days, 21:20:01.60
IF-MIB::ifLastChange.29 = Timeticks: (324904140) 37 days, 14:30:41.40
IF-MIB::ifLastChange.30 = Timeticks: (543354720) 62 days, 21:19:07.20
IF-MIB::ifLastChange.31 = Timeticks: (540741200) 62 days, 14:03:32.00
IF-MIB::ifLastChange.32 = Timeticks: (544203200) 62 days, 23:40:32.00
IF-MIB::ifLastChange.33 = Timeticks: (532586320) 61 days, 15:24:23.20
IF-MIB::ifLastChange.34 = Timeticks: (539739520) 62 days, 11:16:35.20
IF-MIB::ifLastChange.35 = Timeticks: (317402830) 36 days, 17:40:28.30
IF-MIB::ifLastChange.36 = Timeticks: (526321280) 60 days, 22:00:12.80
IF-MIB::ifLastChange.37 = Timeticks: (516494640) 59 days, 18:42:26.40
IF-MIB::ifLastChange.38 = Timeticks: (516494000) 59 days, 18:42:20.00
IF-MIB::ifLastChange.39 = Timeticks: (393778460) 45 days, 13:49:44.60
IF-MIB::ifLastChange.40 = Timeticks: (482336080) 55 days, 19:49:20.80
IF-MIB::ifLastChange.41 = Timeticks: (301946910) 34 days, 22:44:29.10
IF-MIB::ifLastChange.42 = Timeticks: (220132380) 25 days, 11:28:43.80
IF-MIB::ifLastChange.43 = Timeticks: (220194060) 25 days, 11:39:00.60
IF-MIB::ifLastChange.44 = Timeticks: (291442830) 33 days, 17:33:48.30
IF-MIB::ifLastChange.45 = Timeticks: (526602400) 60 days, 22:47:04.00
IF-MIB::ifLastChange.46 = Timeticks: (524041440) 60 days, 15:40:14.40
IF-MIB::ifLastChange.47 = Timeticks: (0) 0:00:00.00
IF-MIB::ifLastChange.48 = Timeticks: (450) 0:00:04.50



Zusammenzählen tut es sich alleine, ich idiot...;-) aber kann ich diesen output grafisch darstellen? (Spitzenreiter und so...9
renee
 2005-05-16 14:56
#54974 #54974
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Du solltest noch genauer erläutern, was Du als Endergebnis haben willst!
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
renee
 2005-05-16 14:58
#54975 #54975
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Willst Du die graphische Auswertung als Bild machen?? Dann könntest Du evtl. etwas mit CPAN:Chart::Plot oder CPAN:GD machen...
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
cheggler
 2005-05-16 14:59
#54976 #54976
User since
2005-05-16
7 Artikel
BenutzerIn
[default_avatar]
Ich habe den letzten thread noch einmal editiert!
Ich möchte diese Daten tabelarisch oder so...(auf jeden fall grafisch) darstellen. Damit ich aus dieser Tabelle herauslesen kann, welcher Port die grösste und welcher die kleinste Uptime hat. (um herauszufinden welche patchungen ins leere gehen...)
renee
 2005-05-16 15:06
#54977 #54977
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Code: (dl )
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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
#! /usr/bin/perl

use strict;
use warnings;

my @infos;

while(my $line = <DATA>){
  my ($port) = $line =~ /ifLastChange\.(\d+)/;
  my ($time) = $line =~ /Timeticks:\s\((\d+)\)/;
  push(@infos,[$port,$time]);
}

for my $info(sort{$a->[1] <=> $b->[1]}@infos){
  print "Port: ",$info->[0],"\tUptime: ",$info->[1],"\n";
}

# ohne leerzeichen:
_ _DATA_ _
IF-MIB::ifLastChange.1 = Timeticks: (219923100) 25 days, 10:53:51.00
IF-MIB::ifLastChange.2 = Timeticks: (291442830) 33 days, 17:33:48.30
IF-MIB::ifLastChange.3 = Timeticks: (0) 0:00:00.00
IF-MIB::ifLastChange.4 = Timeticks: (0) 0:00:00.00
IF-MIB::ifLastChange.5 = Timeticks: (291443150) 33 days, 17:33:51.50
IF-MIB::ifLastChange.6 = Timeticks: (413522130) 47 days, 20:40:21.30
IF-MIB::ifLastChange.7 = Timeticks: (0) 0:00:00.00
IF-MIB::ifLastChange.8 = Timeticks: (300617070) 34 days, 19:02:50.70
IF-MIB::ifLastChange.9 = Timeticks: (291443150) 33 days, 17:33:51.50
IF-MIB::ifLastChange.10 = Timeticks: (219981820) 25 days, 11:03:38.20
IF-MIB::ifLastChange.11 = Timeticks: (219999180) 25 days, 11:06:31.80
IF-MIB::ifLastChange.12 = Timeticks: (301946910) 34 days, 22:44:29.10
IF-MIB::ifLastChange.13 = Timeticks: (220033420) 25 days, 11:12:14.20
IF-MIB::ifLastChange.14 = Timeticks: (221288170) 25 days, 14:41:21.70
IF-MIB::ifLastChange.15 = Timeticks: (24179410) 2 days, 19:09:54.10
IF-MIB::ifLastChange.16 = Timeticks: (516433680) 59 days, 18:32:16.80
IF-MIB::ifLastChange.17 = Timeticks: (516419040) 59 days, 18:29:50.40
IF-MIB::ifLastChange.18 = Timeticks: (516431600) 59 days, 18:31:56.00
IF-MIB::ifLastChange.19 = Timeticks: (543368960) 62 days, 21:21:29.60
IF-MIB::ifLastChange.20 = Timeticks: (468715520) 54 days, 5:59:15.20
IF-MIB::ifLastChange.21 = Timeticks: (0) 0:00:00.00
IF-MIB::ifLastChange.22 = Timeticks: (505795440) 58 days, 12:59:14.40
IF-MIB::ifLastChange.23 = Timeticks: (508682160) 58 days, 21:00:21.60
IF-MIB::ifLastChange.24 = Timeticks: (531186240) 61 days, 11:31:02.40
IF-MIB::ifLastChange.25 = Timeticks: (543026560) 62 days, 20:24:25.60
IF-MIB::ifLastChange.26 = Timeticks: (540585440) 62 days, 13:37:34.40
IF-MIB::ifLastChange.27 = Timeticks: (567193920) 65 days, 15:32:19.20
IF-MIB::ifLastChange.28 = Timeticks: (543360160) 62 days, 21:20:01.60
IF-MIB::ifLastChange.29 = Timeticks: (324904140) 37 days, 14:30:41.40
IF-MIB::ifLastChange.30 = Timeticks: (543354720) 62 days, 21:19:07.20
IF-MIB::ifLastChange.31 = Timeticks: (540741200) 62 days, 14:03:32.00
IF-MIB::ifLastChange.32 = Timeticks: (544203200) 62 days, 23:40:32.00
IF-MIB::ifLastChange.33 = Timeticks: (532586320) 61 days, 15:24:23.20
IF-MIB::ifLastChange.34 = Timeticks: (539739520) 62 days, 11:16:35.20
IF-MIB::ifLastChange.35 = Timeticks: (317402830) 36 days, 17:40:28.30
IF-MIB::ifLastChange.36 = Timeticks: (526321280) 60 days, 22:00:12.80
IF-MIB::ifLastChange.37 = Timeticks: (516494640) 59 days, 18:42:26.40
IF-MIB::ifLastChange.38 = Timeticks: (516494000) 59 days, 18:42:20.00
IF-MIB::ifLastChange.39 = Timeticks: (393778460) 45 days, 13:49:44.60
IF-MIB::ifLastChange.40 = Timeticks: (482336080) 55 days, 19:49:20.80
IF-MIB::ifLastChange.41 = Timeticks: (301946910) 34 days, 22:44:29.10
IF-MIB::ifLastChange.42 = Timeticks: (220132380) 25 days, 11:28:43.80
IF-MIB::ifLastChange.43 = Timeticks: (220194060) 25 days, 11:39:00.60
IF-MIB::ifLastChange.44 = Timeticks: (291442830) 33 days, 17:33:48.30
IF-MIB::ifLastChange.45 = Timeticks: (526602400) 60 days, 22:47:04.00
IF-MIB::ifLastChange.46 = Timeticks: (524041440) 60 days, 15:40:14.40
IF-MIB::ifLastChange.47 = Timeticks: (0) 0:00:00.00
IF-MIB::ifLastChange.48 = Timeticks: (450) 0:00:04.50
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
cheggler
 2005-05-16 15:06
#54978 #54978
User since
2005-05-16
7 Artikel
BenutzerIn
[default_avatar]
Das mit dem Chart::Plot oder dem GD tönt interessant....aber wie gesagt, ich habe absolut keine Ahnung von Perl... ;-) Wie müsste ich das machen?
<< |< 1 2 >| >> 17 Einträge, 2 Seiten



View all threads created 2005-05-16 13:58.