Fonction de partage de Perl
Syntaxe
Le Split () peut être utilisé de différentes manières. Différentes syntaxes de fonction divisée sont données ci-dessous.
UN. diviser
La scission sans aucun argument divisera la valeur de la variable par défaut en fonction de l'espace.
B. divisé
La fonction divisée avec une expression régulière ne divisera que la valeur de la variable par défaut à chaque match.
C. diviser Regex, chaîne
La fonction divisée avec l'expression régulière et la valeur de la chaîne diviseront la valeur de la chaîne en fonction du motif.
D. division regex, chaîne, limite
La fonction divisée avec l'expression régulière, la chaîne et la limite diviseront la valeur de chaîne en fonction du modèle et le nombre d'éléments du tableau renvoyé dépendra de la valeur limite.
Exemple 1: chaîne divisée basée sur l'espace
Créez un fichier perl avec le script suivant qui divisera une valeur de chaîne en fonction de l'espace. Une chaîne de 3 mots a été utilisée ici. La boucle 'for' a été utilisée pour imprimer les valeurs du tableau renvoyées par la fonction Split ().
#Define un texte$ text = "Language de programmation Perl";
#Split le texte en fonction de l'espace
@split_arr = Split (", $ text);
#Iterate chaque élément du tableau
foreach $ word (@split_arr)
# Print chaque mot divisé dans chaque ligne
imprimer "$ word \ n";
Sortir
La sortie suivante apparaîtra après avoir exécuté le script ci-dessus. Le tableau retourné contient trois éléments qui sont imprimés ici.
Exemple 2: chaîne divisée basée sur le caractère particulier
Créez un fichier perl avec le script suivant qui divisera une valeur de chaîne basée sur le caractère, ':'. Une chaîne avec 3 ';' a été utilisé ici. Chaque élément du tableau renvoyé par la fonction Split () a été imprimé séparément en utilisant l'index.
#Define un texte$ text = '11876: Mossaraf Karim: CSE';
#Split le texte en fonction de ':'
@split_arr = Split (':', $ text);
# Print chaque valeur de tableau
print "id: $ split_arr [0] \ n";
imprimer "Nom: $ Split_arr [1] \ n";
Print "Department: $ Split_arr [2] \ n";
Sortir
La sortie suivante apparaîtra après avoir exécuté le script ci-dessus. La valeur de la chaîne a été divisée en trois mots en fonction du ':'.
Exemple 3: Split String avec la limite
Créez un fichier perl avec le script suivant qui divisera une valeur de chaîne en fonction du caractère, ',' et avec la valeur limite. Une chaîne avec 6 ',' a été utilisée et la valeur limite a été définie sur 5 ici. Chaque élément du tableau renvoyé par la fonction Split () a été imprimé séparément en utilisant l'index. La boucle 'for' a été utilisée pour imprimer les valeurs du tableau renvoyées par la fonction Split ().
#Define un texte$ couleurs = "rouge, vert, bleu, blanc, noir, jaune, cyan";
#Split le texte en fonction du caractère et de la limite
@split_arr = split (',', $ couleurs, 5);
imprimer "les couleurs sont: \ n";
#Iterate chaque élément du tableau
foreach $ word (@split_arr)
# Print chaque mot divisé dans chaque ligne
imprimer "$ word \ n";
Sortir
La sortie suivante apparaîtra après avoir exécuté le script ci-dessus. La valeur de la chaîne a été divisée en cinq mots basés sur le ',' et la valeur limite 5.
Exemple 4: Clit la chaîne avec l'expression régulière
Créez un fichier perl avec le script suivant qui divisera une valeur de chaîne en fonction de l'expression régulière. Une chaîne avec des caractères et des nombres alphabétiques a été utilisé ici. Le motif '/ + d /' a été utilisé pour diviser la chaîne en fonction du chiffre. Le motif '/ + D /' a été utilisé pour diviser la chaîne en fonction des alphabets. La boucle 'for' a été utilisée pour imprimer les valeurs du tableau renvoyées par la fonction Split ().
#Define un texte$ text = "j'aime69perl50Programming";
Chaîne #split basée sur les chiffres
@Words = Split (/ \ d + /, $ text);
Imprimez "la sortie après le fractionnement de la chaîne en fonction des chiffres: \ n";
#Iter les valeurs du tableau
foreach $ word (@words)
# Print la valeur
imprimer "$ word";
#Add Newline
imprimer "\ n";
Chaîne #split basée sur les caractères
@Words = Split (/ \ d + /, $ text);
Imprimez "la sortie après avoir divisé la chaîne en fonction des caractères: \ n";
#Iter les valeurs du tableau
foreach $ word (@words)
# Print la valeur
imprimer "$ word";
Sortir
La sortie suivante apparaîtra après avoir exécuté le script ci-dessus. La première fonction Split () a renvoyé un tableau de trois éléments qui sont «j'aime», «perl» et «programmation». La deuxième fonction Split () a renvoyé un tableau de deux éléments qui sont «69» et «50».
Exemple 5: chaîne divisée basée sur une valeur non définie
Créez un fichier perl avec le script suivant qui divisera une valeur de chaîne basée sur la valeur non définie. Une chaîne de 11 caractères a été utilisée ici. Le mot-clé 'unfef' est utilisé comme la valeur du modèle de la fonction Split () qui divisera la chaîne en fonction de chaque caractère de la chaîne. La boucle 'for' a été utilisée pour imprimer les valeurs du tableau renvoyées par la fonction Split ().
#Define une chaîne$ text = 'Hello World';
imprimer "la valeur de chaîne principale: \ n";
imprimer "$ text";
Chaîne #split basée sur une valeur non définie
@split_arr = Split (undef, $ text);
print "\ n la valeur de chaîne divisée: \ n";
#Iterate chaque élément du tableau
foreach $ val (@split_arr)
# Print chaque mot divisé dans chaque ligne
imprimer "$ val";
imprimer "\ n";
Sortir
La sortie suivante apparaîtra après avoir exécuté le script ci-dessus. Le tableau renvoyé contient chaque caractère de la chaîne en tant qu'élément de tableau.
Conclusion
Les différentes utilisations de la fonction Split () ont été montrées dans ce tutoriel en utilisant différents scripts Perl. Les objectifs de l'utilisation de modèles d'expression réguliers et de limite dans la fonction Split () ont été expliqués correctement dans ce tutoriel pour aider les utilisateurs de Perl à utiliser cette fonction efficacement dans le script.