Escribir programas en el Práctico de Extracción e Informe Idioma lenguaje de script cuando se necesita una herramienta que puede automatizar rápidamente la manipulación de cadenas , proporcionar la interacción del usuario y entregar el formato aceptable. Los retornos de carro tienden a alterar el formato de entrada del usuario y la salida del programa Perl para que las cadenas de texto mirada sucia y difícil de seguir. Usar la palabra clave " chomp " para quitar los retornos de carro y limpieza de entrada y salida del programa. Cosas que necesitará de computadora con el intérprete del lenguaje de programación Perl instalado
archivo de secuencia de comandos Perl que contiene la cadena de texto para el que desea un retorno de carro quita
Ver Más instrucciones
1

Abra una ventana de terminal de línea de comandos en un equipo que tiene habilitado Perl. Abra el archivo de secuencia de comandos Perl que contiene una cadena de texto para que el retorno de carro debe ser eliminado.
2

Utilice las teclas de flecha del teclado para colocar el cursor inmediatamente después de la línea en la que se asigna una variable de la cadena de texto como su valor. Por ejemplo, si desea eliminar el retorno de carro de la cadena " Test" a

$ myVariable = " Test \\ n";

Agregar una línea de función " chomp " para el texto variable de cadena inmediatamente después de la asignación de cadena de texto como está escrito a

chomp ($ myVariable ) ;
3

Utilice las teclas de flecha para colocar el cursor después de una línea que acepta entrada del usuario y escribir una línea de función " chomp " para la variable de entrada de cadena de texto para eliminar el retorno de carro de la entrada del usuario para limpiar el formateo. Por ejemplo :

while ( $ entrada = usuario recoger con ) {

print " El usuario ha escrito ' $ input ' \\ n";

última if ($ entrada eq '') ;

}

incluirá el retorno de carro con la entrada del usuario cuando el usuario presiona la tecla "Enter" . Para eliminar el retorno de carro , inserte la función " chomp " tal como está escrita a

while ( $ entrada = usuario recoger con ) {

chomp ( $ entrada ) ;
< p> print " El usuario ha escrito ' $ input ' \\ n";

última if ($ eq entrada '') ;

}