Bonjour a tous,
Je voulais savoir si ce que j ai codé est correct et surtout ca fait bien ce que je pense !!
Voila mon code
La ligne unless .... veut bien dire que si le tableau @Champ_location_vide ne contient rien on ne rentre pas dans la boucle ???
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 unless ((@Champ_location_vide) =~ m/^$/) { foreach (@Champ_location_vide) # { #On recupere dans l ordre : $1=Nom, $2=@IP push (@Tab_Champ_location_vide, $1, $2 ) if(/(.*);(\d+\.\d+\.\d+\.\d+);.*;.*;.*;.*;.*;.*;/); # l'on place dans un tableau #le push permet de rajouter des lignes dans #le tableau en fonction du nombre d index matché } #} print Fichier_pour_mail "\n#####################################\n"; print Fichier_pour_mail "# Champ Syslocation vide ##\n"; print Fichier_pour_mail "#####################################\n"; for (my $A=0;$A<=($#Tab_Champ_location_vide);$A) { print Fichier_pour_mail "\n$Tab_Champ_location_vide[$A] $Tab_Champ_location_vide[$A+1]\n"; $A=$A+2; } }
Le probleme c est que meme si il est vide on y rentre alors pourquoi ?
Merci d avance Jules
Partager