Discussion :

[PlazaDel62]

Bonjour!

Voila j'ai un petit soucis en ce moment... J'aurai aimé savoir comment on peut couper une chaine de caractère en 2 et assimiler chaque morceau a une variable.

Exemple :

$Code=3044001

Je voudrai : $Adh=30440 et $Sub=01

Malheureusement je trouve vraiment aucune réponse .. Merci de me donner des indications si vous le pouvez

[djibril]

as tu une regle précise de définie pour couper ta chaine en deux?
exemple avec les regex.

Code :

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

1
2
$Code=3044001;
my ($Adh, $Sub) = $Code =~ /(\d{5})(\d{2})/;

[knarf87]

Salut.
Commence par splité ta variable car par car :

Code :

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

@CodeSplit=split(//,$Code);

Puis, comme tu a pas l'air d'avoir de délimiteur dans ton $Code tu fait un join en prenant autant de caractères que tu as besoin:

Code :

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

1
2
$Adh=join("",$CodeSplit[0],$CodeSplit[1],$CodeSplit[2],$CodeSplit[3],$CodeSplit[4]);
$Sub=join("",$CodeSplit[5],$CodeSplit[6]);

C'est pas propre mais ca marche.
Cela serait plus evident si tu avais un délimiteur quelconque ou si tu savais exactement combien de car il fallait que tu récupère sur la variable $Code. Auquel cas tu pourra utiliser une expression régulière du style :

Code :

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

1
2
3
4
if($Code=~/(\d{5})(\d{2})/){
 $Adh=$1;
 $Sub=$2;
}

[PlazaDel62]

En fait c'est pas vraiment explicite mais il me fallait en effet les 5 premiers puis les 2 derniers, désolé d'avoir pas été plus précis. En tout cas merci à vous deux pour vos réponses !

[Jedai]

Salut.
Commence par splité ta variable car par car :

Code :

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

@CodeSplit=split(//,$Code);

Puis, comme tu a pas l'air d'avoir de délimiteur dans ton $Code tu fait un join en prenant autant de caractères que tu as besoin:

Code :

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

1
2
$Adh=join("",$CodeSplit[0],$CodeSplit[1],$CodeSplit[2],$CodeSplit[3],$CodeSplit[4]);
$Sub=join("",$CodeSplit[5],$CodeSplit[6]);

C'est pas propre mais ca marche.

Tu sais, la fonction substr() fait ça beaucoup plus proprement et efficacement...

Code :

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

1
2
$Adh= substr $Code, 0, 5;
$Sub= substr $Code, 5, 2;

(ou dans ce cas particulier, une regexp)

--
Jedaï

[knarf87]

Ha ouai...
J'y avais pas pensé ^^.

Merci Jedaï, face a toi je ne suis qu'un pauvre padawan.

FX