In programmazione Perl , la parola chiave "rigorosa " protegge contro i costrutti di dati non sicuri . Cambia alcuni dei requisiti del codice e istruisce l'interprete per cercare alcune altre parole chiave. Utilizzando dichiarazioni severe aiuta il programma per capire meglio le vostre intenzioni , come se si intende utilizzare una subroutine per assegnare valori a una variabile , ma dimentica di definire il sub . Nel programma , è possibile specificare la dichiarazione rigorosa delle variabili , i riferimenti , le subroutine , o tutto quanto sopra . È inoltre possibile attivare la dichiarazione rigorosa ovunque all'interno del programma utilizzando i " use strict " parole chiave e spegnerlo successivamente utilizzando il "no severe " parole chiave . Istruzioni
1
Aprire un file di programma Perl . Digitare il seguente codice :
$ myVar = " Alcuni valore . " ;
Print $ myvar ;
Si noti che la prima variabile utilizza un capitale "V " e la seconda usa una piccola " v " Questo codice non genera un errore , ma in realtà non stampa nulla sullo schermo . Poiché le variabili Perl sono case-sensitive , il programma pensa che si tratta di due diverse variabili , il secondo dei quali non ha un valore . Se si modifica questa seconda variabile " $ myVar ", il programma stamperà il suo valore alla schermata
2
eliminare le righe precedenti e digitare il seguente codice : .
Uso rigoroso ;
$ myVar = " Alcuni valore . " ;
print $ myVar ;
Queste linee generare due errori di runtime , anche se le variabili hanno lo stesso nome , ma sono usati due volte. Digitando " use strict " forze dichiarazione esplicita di tutte le variabili, i riferimenti e le subroutine
3
eliminare le righe precedenti e digitare il seguente codice: .
Use strict " vars " ;
miei $ myvar = " qualche valore . " ; riferimenti
la prima riga specifica che il programma richiede solo la dichiarazione di variabili , ma non o ;
print $ myVar subroutine . La " mia " parola chiave dichiara le variabili locali . Il codice in questo esempio funziona esattamente come si desidera che
4
eliminare le righe precedenti e digitare il seguente codice :
use strict ;
mio $ . myVar = "Alcuni valore . " ;
print $ myVar ;
non rigoroso " vars " ;
$ MyVar2 = " Qualche nuovo valore . " ;
< p > print $ MyVar2 ;
La prima linea richiede la dichiarazione di variabili, i riferimenti e le subroutine . La quarta linea ferma il programma di richiedere la dichiarazione rigoroso solo per le variabili . Questo permette la variabile $ MyVar2 da utilizzare senza dichiararlo
5
eliminare le righe precedenti e digitare il seguente codice :
use strict " refs " ;
< p . > $ myVar = " Alcuni valore . " ;
$ ref = " myVar " ; print
$ $ ref;
noti che questo esempio viene specificato solo per utilizzare i riferimenti rigorosi , il che significa che va bene a non dichiarare la variabile qui . Se si è utilizzato semplicemente " use strict ", invece , si dovrebbe usare il " mio ", parola chiave di fronte a entrambi myVar $ e $ ref dichiararli . Tuttavia, la terza linea ancora genera un errore perché si è tentato di utilizzare $ ref come riferimento scalare
6
eliminare le righe precedenti e digitare il seguente codice: .
Use strict " refs " ;
$ myVar = " Alcuni valore " ; .
$ ref = \\ $ myVar ; print
$ $ ref;
Il terzo linea in questo esempio viene utilizzato il backslash per dichiarare il riferimento alla variabile $ myVar , che consente di usarlo senza generare un errore
7
eliminare le righe precedenti e digitare il seguente codice: . < br >
$ myVar = mySub ;
print $ myVar ;
" mySub " vuole essere un po 'di subroutine che si deve ancora definire , Perl assegna " mySub " come stringa valore di $ myVar e stampe che la parola alla schermata
8
eliminare le righe precedenti e digitare il seguente codice :
uso rigoroso " subs " ;
. $ myVar = mySub ;
print $ myVar ;
La prima linea richiede subroutine da dichiarare . Se è stato codificato " mySub " precedentemente nel programma , il valore di ritorno da esso viene assegnato a $ myVar , altrimenti viene generato un errore di run -time .
