Bonjour a tous,
voila je vais essayer de vous expliquer ce que je souhaite faire:

Voila mon programme
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
 
 sub Fonct_Loca_Alim
                        {
                                my $Cmd_Snmp_Type = "snmpwalk -v1 -On -c $Com_Snmp";
                                my @Cmd_Snmp_Type_Oid  = `$Cmd_Snmp_Type $Addr_Ip .1.3.6.1.2.1.47.1.1.1.1.5`;
                                my i=0;
                                i=i++;
                                if
                                {
                                print("$Cmd_Snmp_Type_Oid[i]");
                                }
                                #chomp($Cmd_Snmp_Type_Oid);
                                #Enlève le dernier caractère de la chaîne
                                #return @Cmd_Snmp_Type_Oid;
                                #Permet de retourner une variable precise, évite d'avoir la variable par defaut
                                #print("$Cmd_Snmp_Type_Oid[22]");
                        }
 
                        &Fonct_Loca_Alim

Voila ce que me ressort la commande snmp
  • 47.1.1.1.1.5.1 = 3
    47.1.1.1.1.5.2 = 5
    47.1.1.1.1.5.3 = 5
    47.1.1.1.1.5.4 = 5
    47.1.1.1.1.5.5 = 4
    47.1.1.1.1.5.6 = 5
    47.1.1.1.1.5.7 = 7
    47.1.1.1.1.5.8 = 8
    47.1.1.1.1.5.9 = 5
    47.1.1.1.1.5.10 = 5
    47.1.1.1.1.5.11 = 6
    47.1.1.1.1.5.12 = 8
    47.1.1.1.1.5.13 = 8
    47.1.1.1.1.5.14 = 8


Et je voudrais matcher les lignes qui valent 6 poue en extraire le dernier chiffre de OID correspondant !!
exemple >>>47.1.1.1.1.5.11 = 6
c est le 11 qui m interesse !!!
Comment puis je faire ?
Merci d avance Jules
Merci d avance Jules