Discussion :

[brunolekid]

Bonjour,

Je travaille sous linux et j ai créé un fichier liste_process.txt qui recense plusieurs process par leur chemin d'exécution (ex: /usr/bin/perl /opt/PRO/Profint/COM/ALIM/alim.pl 270088 ALIM.COM SUD_ALIM SUD_ALIM -M). Je souhaiterai récupérer uniquement le nom du fichier (ici alim) toujours compris entre "/" et ".pl" dans une liste (@liste) dynamique où @liste[0] contiendrait le nom du premier fichier...

N'ayant jamais fait ce genre d'opération je suis un peuy perdu.

Merci

[djibril]

http://perl.developpez.com/sources/?...tion1#BaseName

[brunolekid]

Merci mais dans mon cas je ne controle pas $fichier car le nom d'un fichier provient de liste_process.txt
donc il faut que je lise ce fichier a l aide d un while...?

[brunolekid]

et je ne souhaite que récupérer les nom des fichiers d'extension .pl

merci

[brunolekid]

avec le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
open (LIST,"$list_process") or (print "cannot create outputfile, $!\n" and &exit(3));
	$i=0;
	while ($ligne=<LIST>){
		chop($ligne);
		if($ligne=~/[A-Z]+\/(\w+)\.pl/){
			@list2[$i]=$&;
			$i++;
		}
	}
	open (OUT,">> $log_file") or (print "cannot create outputfile, $!\n" and &exit(3));
	for ($j=0; $j<=$i; $j++){
		print OUT "@list2[$j]\n";
	}
	close OUT;

J arrive a récupérer "ALIM/alim.pl"
mais je ne voudrais récupérer que "alim"
Une idée?

[brunolekid]

J ai trouvé il fallait changé $& en $1
probleme résolu!!