voila mon script lit un fichier de conf le but est que des qu'il retrouve une ligne du type :
chaine de caracter1 :chaine de caracter2 :chaine de caractere 3
il doit creer un lien sur la chaine de caractere *3
or mon souci est que lors de l'execution mon scrip cree le lien sur l'ensemble des chaine apres la premier ligne c'est a dire:
voila le resultat
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
26
27
28
29
30
31
32
33 print "bonjour le fichier selectionner est \n"; @nomfich=split(/\=/,$input); $fichier=$nomfich[1]; print $fichier; open(CONF ,"$fichier") || die ("Pb ouverture fichier : $!"); my @fich = <CONF>; print CONF; close CONF; ########## #cette partie doit permettre de spliter les chaines de caractere du fichier de conf #et donc de recuperer la derniere partie de la ligne de conf ...:...:___ ########## $separateur=":"; $toto=@fich; my @resultat=split($separateur,$toto) ; print $resultat[2]; ########## #ici pour tout texte spliter on creer un lien #sur la derniere partie de la ligne ########## foreach(@fich) { print ; { print @resultat; print "<a href=$resultat[2]>";
bonjour le fichier selectionner est fichier1.txtlibelle :action : liste uid autorises 3lister les dates de changement des mots de passe: passwd -as:0 3lister les processus: ps -ef:0 3
retour
donc ce que je vous demande c'est comment faiire pour execute la commande a chaque ligne
Partager