Programación en Perl/Tu primer programa
Tu primer programa en Perl
[editar]En Perl, el programa canónico "Hola mundo" es:
#!/usr/bin/perl
print "¡Hola mundo!\n"; # "\n" es un 'nueva línea'
# Asi de sencillo.
- La primera línea contiene el shebang (par de caracteres que identifica el texto que sigue), que le indica al sistema operativo dónde encontrar el intérprete de Perl.
- La segunda imprime el string ¡Hola mundo! y un carácter de nueva línea, seguido por ; que representa en final de la línea de código y finalmente sigue un comentario.
- La tercera línea es un comentario.
El signo # en la segunda y tercera línea es un 'token comentario', que permite al intérprete perl ignorar todo lo que le siga, hasta el final de la línea de texto.
El shebang es la forma normal para invocar al intérprete en los sistemas Unix. Los sistemas Windows pueden seguir utilizándolo o pueden asociar la extensión de archivo .pl con el intérprete Perl. Algunos editores de texto también usan la línea shebang como una pista sobre el modo de trabajo en que deben operar. Si el programa es ejecutado por perl y no invocado por el shell, la línea que empieza por el shebang es parseada para interpretar las opciones. En otro caso, es ignorada. Para ver los detalles de esto, consultar la página de manual perlrun.
C: user/admin ~]# more /usr/local/bin/activar_alarma.pl
- !/usr/bin/perl
use Device::ParallelPort; use Device::ParallelPort::drv::linux;
my $port = Device::ParallelPort->new('linux');
$port->set_bit(1,0);#Inicializo a 0 $port->set_bit(2,0);#Inicializo a 0 sleep (1);
$port->set_bit(1,1); #Pongo a 1 el bit 1 para que se "presione" el botón print "Activando…\n"; sleep 5; #Espero 5 segundos con el botón "presionado"
$port->set_bit(1,0); #Suelto el botón
Sobre print
[editar]print es un instrucción de Perl y se conoce como función de Perl.
Para mas detalles sobre las funciones puedes consultar en la sección de Anexos la lista de funciones, para print consulta función print.
Tu primer programa en Perl «como CGI»
[editar]Perl fue uno de los lenguajes inicialmente usados para realizar CGI's en Servidores Web por lo que en este apartado se describe como usar Tu primer programa en Perl «como CGI» con solo agregarle una línea a tu programa.
La línea que se agregaría es esta
print "Content-type:text/html"."\n\n";
con esto le indicas a Perl que la impresión será en el "Navegador" de internet en lugar de la pantalla de tu monitor. Quedando así el script:
#!/usr/bin/perl
print "Content-type:text/html"."\n\n";
print "¡Hola Mundo!\n";
En donde el simbolo . (punto) une ambas cadena de texto dentro de la sentencia print y las dos nuevas líneas (\n\n) son estrictamente necesarias para que el servidor sepa como tratar los datos que enviará al Navegador del cliente.
Ejercicios
[editar]
Ejercicios para practicar, podrías intentar estas cosas:
Hola, Buen día Estas son... mis primeras líneas en Perl