Discussion :

[tunwim]

Salut,

Ma donnée est là suivante :

$type=/package_types/Boolean

Est ce qu'il y a une fonction en perl qui extraire "Boolean" ?

C'est à dire,extraire toutes les données juste après la deuxième "/"

[grim7reaper]

Salut,

Il suffit de faire un split sur ta chaîne, de découper en fonction du / et de récupérer le bon élément dans la liste renvoyée.
Par exemple :

Code :

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

perl -e '$type = "/package_types/Boolean"; print((split(/\//,$type))[2])'

[Lolo78]

Ou une expression régulière. Si le fichier s'appelle fichier.txt:

Code :

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

perl -ne 'print $1, "\n" if m![^/]+/[^/]+/(.+$)!'   fichier.txt

[tunwim]

Bonjour,

Merci pour vos réponses et ça marche très bien avec

Code :

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

1
2
3
 
	my $type1=(split(/\//,$type))[2];
	push (@t,$type1);

donc je récupère dans le tableau "t" la liste de type nécessaire
merci