gilou Modérateur Modosaurus Rex | En perl, ce serait ainsi :
Code :
use strict;
use warnings;
my $data = "ENG(1),ESP(1,2),CHI";
my $i = 1;
my %hash = map {($i++, $_)} split(/(?<=[A-Z)]),/, $data);
# ou my @liste = split(/(?<=[A-Z)]),/, $data); si c'est une liste que tu veux
# et on le vérifie:
my ($first, @others) = sort(keys(%hash));
print "$first => $hash{$first}";
print ", $_ => $hash{$_}" foreach (@others);
|
E:\Programming\Perl>perl testreg.pl
1 => ENG(1), 2 => ESP(1,2), 3 => CHI |
A toi d'adapter au php.
A+, Message édité par gilou le 10-09-2018 à 14:53:32 ---------------
There's more than what can be linked! -- Le capitaine qui ne veut pas obéir à la carte finira par obéir aux récifs. -- Il ne faut plus dire Sarkozy, mais Sarkozon -- (╯°□°)╯︵ ┻━┻
|