Bonjour,
Je lis un fichier en perl. Chaque ligne contient des nombres séparés par des points d'interrogation. Le problème est qu'avec split, je n'arrive pas à récupérer les éléments vides.
Je lis la ligne comme suit :
Voici ce que je récupère (à gauche ce que je lis dans le fichier, à droite le tableau que j'obtiens) :
Code : Sélectionner tout - Visualiser dans une fenêtre à part my @tab = split(/\?/, $line);
Et voici ce que je voudrais obtenir :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 81?12 => ("81", "12"), taille = 2 37?9? => ("37", "9"), taille = 2 ?? => (), taille = 0 ?84? => ("", "84"), taille = 2 63??13 => ("63", "", "13"), taille = 3
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 81?12 => ("81", "12"), taille = 2 37?9? => ("37", "9", ""), taille = 3 ?? => ("", "", ""), taille = 3 ?84? => ("", "84", ""), taille = 3 63??13 => ("63", "", "13"), taille = 3
Merci !
Partager