1
 definir un criterio para eliminar una cadena. Por ejemplo , decidir si usted necesita para eliminar una cadena que comienza con la palabra " dinero ". 
 2 
 Utilice el bucle Perl " foreach " para leer el conjunto de datos como un archivo 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 se traduce en la eliminación de la cadena . 
 
 $ string = ~ s /dinero + //; . 
 
 Tenga en cuenta que la cadena comienza con la palabra " dinero " y la expresión regular ( + . ) coincide con otros caracteres en la cadena 
 < . br> 
          
