Perl usa declaraciones y expresiones para evaluar la entrada proporcionada por el usuario o proporcionada como entrada codificada en el código. Esta expresión evaluada no se mostrará al programador ya que ha sido evaluada en el compilador. Para mostrar esta expresión evaluada, Perl usa print()función y say()función. Estas funciones pueden mostrar cualquier cosa que se les pase como argumentos.
operador de impresión() –
El operador de impresión en Perl se usa para imprimir los valores de las expresiones en una lista que se le pasa como argumento. El operador de impresión imprime lo que se le pasa como argumento, ya sea una string, un número, una variable o cualquier cosa. Las comillas dobles («») se utilizan como delimitador de este operador.
Sintaxis:
print "";
Ejemplo:
#!/usr/bin/perl -w # Defining a string $string1 = "Geeks For Geeks"; $string2 = "Welcomes you all"; print "$string1"; print "$string2";
Geeks For GeeksWelcomes you all
El ejemplo anterior, imprime ambas strings con la ayuda de la función de impresión, pero ambas strings se imprimen en la misma línea. Para evitar esto e imprimirlos en diferentes líneas, necesitamos usar un operador ‘\n’ que cambia la línea cada vez que se usa.
Ejemplo:
#!/usr/bin/perl -w # Defining a string $string1 = "Geeks For Geeks"; $string2 = "Welcomes you all"; print "$string1\n"; print "$string2";
Geeks For Geeks Welcomes you all
Si usamos comillas simples en lugar de comillas dobles, la print()función no imprimirá el valor de las variables o los caracteres de escape utilizados en la declaración como ‘\n’, etc. Estos caracteres se imprimirán tal cual y no se evaluarán. .
Ejemplo:
#!/usr/bin/perl -w # Defining a string $string1 = 'Geeks For Geeks'; $string2 = 'Welcomes you all'; print '$string1\n'; print '$string2';
$string1\n$string2
función decir() –
La función say() en Perl funciona de manera similar a la función print() pero hay una pequeña diferencia, la función say() agrega automáticamente una nueva línea al final de la instrucción, no es necesario agregar un carácter de nueva línea ‘\n’ para cambiando la línea.
Ejemplo:
#!/usr/bin/perl -w
use 5.010;
# Defining a string
$string1 = "Geeks For Geeks";
$string2 = "Welcomes you all";
# say() function to print
say("$string1");
say("$string2");
Geeks For Geeks Welcomes you all
Aquí, hemos usado ‘ use 5.010‘ para usar la función say() porque las versiones más recientes de Perl no son compatibles con algunas funciones de las versiones anteriores y, por lo tanto, se debe llamar a la versión anterior para ejecutar la función say().