En programación Perl, la palabra clave "estricta" protege contra construcciones de datos seguras. Cambia algunos de los requisitos del código y ordena al intérprete para buscar otras palabras clave. Usando declaraciones estrictas ayuda a su programa para entender mejor sus intenciones , como si te refieres a utilizar una subrutina para asignar valores a una variable pero se olvidan de definir la sub . En su programa , puede especificar declaración estricta de las variables , las referencias , las subrutinas , o todo lo anterior . También se puede activar en la declaración estricta en cualquier lugar dentro del programa a través del " uso estricto" palabras clave y apagarlo después usando el "no " palabras clave estrictas . Instrucciones
1
Abra un archivo de programa Perl. Escriba el siguiente código:
$ myVar = "Algunos de valor. " ;
Print $ myvar ;
Tenga en cuenta que la primera variable utiliza un capital de " V " y el segundo utiliza una pequeña " v " Este código no genera un error , pero en realidad no imprime nada en la pantalla. Dado que las variables Perl entre mayúsculas y minúsculas , el programa piensa que se trata de dos variables diferentes, el segundo de los cuales no tiene un valor. Si cambia esta segunda variable "$ myVar ", el programa imprimirá su valor a la pantalla
2
Eliminar las líneas anteriores y escriba el siguiente código : . Usa
estricta ;
$ myVar = "Algunos de valor. " ;
print $ myVar ;
Estas líneas generan dos errores de tiempo de ejecución a pesar de que las variables tienen el mismo nombre , sino que se utilizan dos veces. Al escribir " use strict " fuerzas declaración explícita de todas las variables, referencias y subrutinas
3
Eliminar las líneas anteriores y escriba el siguiente código: .
Uso estricto " vars " ;
mis myvar = "Algunos de valor. " $ ;
print $ myVar ;
la primera línea especifica que el programa sólo requiere la declaración de variables, pero no referencias o subrutinas . El " mi " palabra clave declara variables locales. El código de este ejemplo funciona exactamente como usted quiere que
4
Eliminar las líneas anteriores y escriba el siguiente código:
use strict ;
my $ . myVar = "Algunos de valor. " ;
print $ myVar ;
no estrictas " vars " ;
$ MyVar2 = " Algunas valor nuevo . " ;
< p> print $ MyVar2 ;
La primera línea requiere declaración de variables, referencias y subrutinas . La cuarta línea se detiene el programa desde que requiera una declaración objetiva por sólo variables. Esto permite que la variable $ MyVar2 a utilizar sin declararlo
5
Eliminar las líneas anteriores y escriba el siguiente código:
uso estricto " árbitros " ;
< p . > $ myVar = "Algunos de valor. " ;
$ ref = " myVar " ;
print $ $ ref ;
Tenga en cuenta que este ejemplo se especifica sólo para utilizar referencias estrictas , lo que significa que está bien para no declarar la variable aquí . Si ha utilizado simplemente " use strict " en su lugar, usted tendría que usar el " mi " palabra clave frente a tanto $ myVar y $ árbitro declararlos . Sin embargo , la tercera línea todavía genera un error porque se trató de utilizar $ ref como referencia escalar
6
Eliminar las líneas anteriores y escriba el siguiente código: .
Use strict " árbitros " ;
$ myVar =" Algunas valor " ; .
$ ref = \\ $ myVar ;
print $ $ ref ;
La tercera línea de este ejemplo se utiliza la barra invertida para declarar la referencia a la variable myVar $, lo que le permite usarlo sin generar un error cuando 7
Eliminar las líneas anteriores y escriba el siguiente código: . < br >
$ myVar = mySub ;
print $ myVar ;
Si " mySub " pretende ser una subrutina que aún tiene que definir , Perl asigna " mySub " como una cadena valor de $ myVar e imprime esa palabra a la pantalla
8
Elimine las líneas anteriores y escriba el siguiente código:
uso estricto " subs " ;
. $ myVar = mySub ;
print $ myVar ;
La primera línea requiere subrutinas que se declare . Si ha codificado " mySub " previamente en el programa, el valor de retorno de la misma se asigna a $ myVar , de lo contrario se genera un error en tiempo de ejecución .