[résolu] Split de variable

Bonjour,

je souhaiterai faire un split un peu complexe pour moi.

Une variable séparée par des "_". a=DF_GDF_TYG_UGFD

dont je voudrai récupérer dans une autre variable tout sauf ce qu'il y a devant le 1er "_". Dans ce cas b=GDF_TYG_UGFD

Avec a qui contient un nombre non fixe de "_"

Merci pour votre aide.

Bonjour,

si tu tiens vraiment à le faire avec un split:

Code:

---

1 2 3

my $c = "DF_GDF_TYG_UGFD"; my @d = split /_/, $c; my $e = join "_", @d[1..$#d]; # $e contient: GDF_TYG_UGFD

---

Mais dans un tel cas, j'utiliserais plutôt une expression régulière:

Code:

---

1 2	my $c = "DF_GDF_TYG_UGFD"; my $f = $1 if $c =~ /_(\w+)/; # $f contient GDF_TYG_UGFD

---

Bonjour,

Avec un split on peut aussi faire :

Code:

---

1 2	my $c = "DF_GDF_TYG_UGFD"; my $e = (split(/_/, $c, 2))[1]; # $e contient: GDF_TYG_UGFD

---

Merci beaucoup à vous.
J'ai finalement fait sans split et ça fonctionne très bien.