Cómo quitar Cadena en Perl

Cuando se trabaja con archivos de texto o bases de datos a menudo es necesario identificar y eliminar ciertas líneas o cadenas. Una cadena es un trozo de texto que consta de más de una palabra. El lenguaje de programación Perl es compatible con una serie de características que incluyen expresiones regulares. Una expresión regular describe un patrón que le permite adaptar con facilidad una cadena que satisface el patrón de búsqueda y luego quitarlo si fuera necesario.

Instrucciones

1 Definir un criterio para la eliminación de una cadena. Por ejemplo, decidir si es necesario para eliminar una cadena que comienza con la palabra "dinero".

2 Utilice la Perl bucle "foreach" para leer el conjunto de datos de un archivo de este tipo para encontrar la cadena en cuestión:

foreach $ string (@data) {

}

En este ejemplo, la matriz (@data) contiene los datos de un archivo.

3 Utilice el comando "= ~ s" dentro del bucle de sustituir la cadena coincidente con nada (//) que resulta en la eliminación de la cadena.

$ Cadena = ~ s / dinero + //.;

Tenga en cuenta que la cadena comienza con la palabra "dinero" y la expresión regular (. +) Coincide con ningún otro carácter en la cadena.