Discussion :

[tissam89]

Bonjour,

J'utilise perl pour ecrire des scripts qui seront utilisé sur nagios . Quand j'ai cherché sur internet , j'ai trouvé un script en perl déja ecris, mais je n'arrive pas à le comprend ou savoir ce que je dois lui donner en entrée. Voici le script :

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
#!/usr/bin/perl
use strict;
 
open(MODEL, "modele.txt");
mkdir("modeles") if(!-d("modeles"));
while() {
  chomp();
  my($modele, $ip) = split(/;/);
  my @interfaces = `snmpwalk -c ecalyptus -v 2c $ip 1.3.6.1.2.1.2.2.1.2`;
  open(MODEL_CFG, ">modeles/switch-$modele.cfg");
  foreach(@interfaces) {
    if(/iso.3.6.1.2.1.2.2.1.2.(\d+) = STRING: "(.*Ethernet.*)"/) {
      my ($id, $interface) = ($1, $2);
      print MODEL_CFG "define service {
  hostgroup_name       $modele
  use                  generic-service
  service_description  $interface
  check_command        check_port_usage!$id!6000!8000
}
\n";
    }
  }
  close(MODEL_CFG);
}
close(MODEL);

et voici sa réference :

http://lesaventuresdeyannigdanslemon...tch-cisco.html

Pouvez vous m'aider s'il vous plait ?

je l'ai enregistré sous le nom test , et quand je fais : ./test.pl , il ne fait que créer un dossier modeles , et un fichier dedans vide qui est nomé switch-.cfg

[messinese]

Bonjour,

alors hors mis que je trouve ce code plutot crade, il te demande un fichier contenant:
" modele de l'équipement;ip"
l'ip sera ensuite utilisée via snmpwalk afin de récupérer les infos et te générer le fichier de configuration nagios (service) correspondant, à savoir:
"switch-modele.cfg" et ainsi effectuer un classement par modele d'équipements.

Enfin une question pour la fin: as tu des bases en developpement/administration Nagios?
Cdlt.