Cómo quitar los espacios iniciales en Perl

Los espacios iniciales son caracteres en blanco guardados en una variable u otra construcción que , en la mayoría de los casos, no sirven a ningún propósito funcional . En Perl , puede quitar los espacios iniciales utilizando el modificador " \\ s " , que representa a todo tipo de espacios en blanco , incluidos espacios en blanco , tabuladores , nuevas líneas y retornos de carro . Puede utilizar este modificador para comprobar una cadena existente para espacios iniciales y luego eliminarlos. Esto ayuda a asegurar la integridad de los datos, especialmente cuando se utiliza para otros fines , tales como comparaciones o manipulación de cadenas . Instrucciones
1

Abra un archivo de programa Perl. Inserte el cursor donde desee quitar los espacios iniciales de una variable
2

Escriba el siguiente código:

my $ cadena = "Mi cadena con un espacio inicial " ; < . br>

print $ cadena. " \\ n";

$ string = ~ s /^ \\ s + //;

print $ cadena. " \\ n";

La variable en este ejemplo tiene un espacio inicial antes de que el texto, pero el patrón de la función correspondiente en la tercera línea sería eliminar todos los espacios iniciales , incluidos carácter de escape como " \\ t " para un tab . La función en sí comienza con " s /" y llama al operador de sustitución. El " ^ " dice que para que coincida con desde el principio de la cadena . El " \\ s " indica que debe comprobar si hay espacios en blanco y el signo "+ " indica que debe dejar el resto de la cadena intacta .
3

Guardar el archivo de programa Perl.