Facebookfacebook Twitter Emailmail Imprimirprint
Domingo 3 de noviembre de 2024
Santoral:
Martín de Porres
Otros:
Día mundial del Sandwitch
Semana:
44
Día año:
308/366 (84%)
U.F.:
Sin información
IPC:
Sin información
Dolar:
Sin información
Euro:
Sin información
Bitcoin:
U$ {bitcoin}
mindicador.cl

Utilice constantes en su programa Perl

Mejora la comprensión del programa para futuras modificaciones

Introducción

El uso de constantes en la programación es de utlizada para comprender de mejor manera lo que se está haciendo, por ejemplo, cuando tenemos variables de estado, es más claro usar el término ACTIVO que el valor 17, o utilizar PI frente a 3.1415927

Forma de uso

Se definen las constantes por medio de la declaración:

#/usr/bin/perl

use constant PI => 4 * atan2(1, 1);
use constant {
        PENDIENTE => 0 ,
        PROCESANDO => 1,
        TERMINADO => 2,
        TIMEOUT => 3
        } ;

use constant DIAS => qw(Domingo Lunes Martes Miercoles Jueves Sabado) ;
...

print "El valor de PI es" . PI . "\n" ;
...

while ( $estado == PROCESANDO ) { ... }
...

$d = (DIAS)[2] ;
...

Vemos diferentes formas de declaración, para el caso de PI se define mediante una operación matemática en la ejecución del script. Posteriormente se definen una serie de constante agrupadas en paréntesis de llave ( {} ), para finalmente declarar un arreglo constante con los días de la semana en español, aunque para los arreglos, la forma de accederlo posteriormente no es muy natural como se aprecia en la asignación $d = (DIAS)[2], donde los paréntesis se requieren para forzar la interpretación como arreglo.

Escrito por: Luis Hernán de la Barra, 25/08/2015
Si tiene interés por alguno de éstos servicios u otro similar, por favor llene el formulario de contacto

Generado por Sistema y almacenado en cache

Wyzer
Luis Hernán de la Barra
Teléfono:   +56995451689
WhatsApp:   +56995451689
E-Mail:info@wyzer.cl
Web:www.wyzer.cl