1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
unless ((@Champ_location_vide) =~ m/^$/)
{
foreach (@Champ_location_vide)
#
{
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";
print Fichier_pour_mail "\n@Champ_location_vide\n"; |
