Función dividida de perl

La función split () se usa para dividir cualquier cadena en función de cualquier delimitador en particular y si no se proporciona un delimitador, el espacio se usa como delimitador predeterminado. El delimitador puede ser un personaje, una lista de caracteres, un patrón de expresión regular, el valor hash y un valor indefinido. Esta función puede ser utilizada de diferentes maneras por el script perl. Se han mostrado diferentes usos de la función Split () en Perl en este tutorial utilizando múltiples ejemplos.

Sintaxis

La división () se puede usar de diferentes maneras. Diferentes sintaxis de función dividida se dan a continuación.

A. dividir
La división sin ningún argumento dividirá el valor de la variable predeterminada en función del espacio.

B. dividido
La función dividida con expresión regular solo dividirá el valor de la variable predeterminada en cada coincidencia.

C. divegex, cadena
La función dividida con la expresión regular y el valor de la cadena dividirán el valor de la cadena en función del patrón.

D. divisionar regex, cadena, límite
La función dividida con la expresión regular, la cadena y el límite dividirá el valor de la cadena en función del patrón y el número de elementos de la matriz devuelto dependerá del valor límite.

Ejemplo 1: cadena dividida basada en el espacio

Cree un archivo Perl con el siguiente script que dividirá un valor de cadena basado en el espacio. Se ha utilizado una cadena de 3 palabras aquí. El bucle 'para' se ha utilizado para imprimir los valores de la matriz devueltos por la función Split ().

#Define un texto
$ text = "lenguaje de programación perl";
#Diseñe el texto basado en el espacio
@split_arr = split (", $ text);
#Iterate cada elemento de la matriz
foreach $ word (@split_arr)
#Impresa cada palabra dividida en cada línea
imprimir "$ word \ n";

Producción
La siguiente salida aparecerá después de ejecutar el script anterior. La matriz devuelta contiene tres elementos que se imprimen aquí.

Ejemplo 2: cadena dividida basada en el carácter en particular

Cree un archivo Perl con el siguiente script que dividirá un valor de cadena basado en el carácter, ':'. Una cadena con 3 ';' se ha utilizado aquí. Cada elemento de la matriz devuelto por la función Split () se ha imprimido por separado utilizando el índice.

#Define un texto
$ text = '11876: Mossaraf Karim: CSE';
#Splica el texto basado en ':'
@split_arr = split (':', $ text);
#Imprimir cada valores de matriz
imprimir "id: $ split_arr [0] \ n";
Imprimir "Nombre: $ Split_arr [1] \ n";
imprimir "departamento: $ split_arr [2] \ n";

Producción
La siguiente salida aparecerá después de ejecutar el script anterior. El valor de la cadena se ha dividido en tres palabras basadas en ':'.

Ejemplo 3: Split String con el límite

Cree un archivo Perl con el siguiente script que dividirá un valor de cadena basado en el carácter, ',' y con el valor límite. Se ha utilizado una cadena con 6 ',' y el valor límite se ha establecido en 5 aquí. Cada elemento de la matriz devuelto por la función Split () se ha imprimido por separado utilizando el índice. El bucle 'para' se ha utilizado para imprimir los valores de la matriz devueltos por la función Split ().

#Define un texto
$ Colors = "rojo, verde, azul, blanco, negro, amarillo, cian";
#Splica el texto basado en el carácter y el límite
@Split_arr = Split (',', $ Colors, 5);
imprimir "Los colores son: \ n";
#Iterate cada elemento de la matriz
foreach $ word (@split_arr)
#Impresa cada palabra dividida en cada línea
imprimir "$ word \ n";

Producción
La siguiente salida aparecerá después de ejecutar el script anterior. El valor de la cadena se ha dividido en cinco palabras en función del '', y el valor límite 5.

Ejemplo 4: Split String con la expresión regular

Cree un archivo Perl con el siguiente script que dividirá un valor de cadena basado en la expresión regular. Aquí se ha utilizado una cadena con caracteres alfabéticos y números. El patrón '/+d/' se ha utilizado para dividir la cadena en función del dígito. El patrón '/+D/' se ha utilizado para dividir la cadena basada en alfabetos. El bucle 'para' se ha utilizado para imprimir los valores de la matriz devueltos por la función Split ().

#Define un texto
$ text = "I Like69perl50programming";
#Cadena de placa basada en los dígitos
@Words = Split (/\ d+/, $ Text);
imprima "la salida después de dividir la cadena basada en dígitos: \ n";
#Iterate los valores de la matriz
foreach $ word (@words)

#Imprima el valor cada uno
imprimir "$ word";

#Add Newline
imprimir "\ n";
#String Split basada en los caracteres
@Words = Split (/\ d+/, $ Text);
imprima "la salida después de dividir la cadena basada en caracteres: \ n";
#Iterate los valores de la matriz
foreach $ word (@words)

#Imprima el valor cada uno
imprimir "$ word";

Producción
La siguiente salida aparecerá después de ejecutar el script anterior. La primera función de división () ha devuelto una matriz de tres elementos que son 'me gusta', 'perl' y 'programación'. La segunda función dividida () ha devuelto una matriz de dos elementos que son '69' y '50'.

Ejemplo 5: cadena dividida basada en un valor indefinido

Cree un archivo Perl con el siguiente script que dividirá un valor de cadena basado en el valor indefinido. Se ha utilizado una cadena de 11 caracteres aquí. La palabra clave 'undef' se usa como el valor de patrón de la función dividida () que dividirá la cadena en función de cada carácter de la cadena. El bucle 'para' se ha utilizado para imprimir los valores de la matriz devueltos por la función Split ().

#Define una cadena
$ Text = 'Hello World';
Imprima "El valor principal de la cadena: \ n";
imprimir "$ text";
#Cadena de placa basada en un valor indefinido
@Split_arr = Split (Undef, $ Text);
imprimir "\ nthe dividido valor de cadena: \ n";
#Iterate cada elemento de la matriz
foreach $ val (@split_arr)
#Impresa cada palabra dividida en cada línea
imprimir "$ val";

imprimir "\ n";

Producción
La siguiente salida aparecerá después de ejecutar el script anterior. La matriz devuelta contiene cada carácter de la cadena como elemento de matriz.

Conclusión

Los diversos usos de la función Split () se han mostrado en este tutorial utilizando diferentes scripts de Perl. Los propósitos de utilizar patrones de expresión regulares y limitar en la función Split () se han explicado correctamente en este tutorial para ayudar a los usuarios de Perl a usar esta función de manera eficiente en el script.