Na programação Perl, a palavra-chave "strict" protege contra construções de dados não seguros. Ele altera alguns dos requisitos do código e instrui o intérprete de olhar para algumas outras palavras-chave. Usando declarações rigorosas ajuda o seu programa para entender melhor suas intenções , como se você quer dizer usar uma sub-rotina para atribuir valores a uma variável , mas se esqueça de definir o sub . Em seu programa, você pode especificar declaração estrito de variáveis , referências, sub-rotinas , ou todas as anteriores . Você também pode ativar a declaração estrita qualquer lugar dentro do programa usando a "utilização rigorosas " palavras-chave e desligá-lo mais tarde usando o "não rígidas" palavras-chave. Instruções
1
Abra um arquivo de programa Perl. Digite o seguinte código:
$ myVar =;
print $ myvar ;
Note que a primeira variável usa um capital "V" eo segundo " algum valor. " usa um pequeno " v " Este código não gerar um erro , mas na verdade não imprime nada na tela. Como as variáveis de Perl são case-sensitive , o programa pensa que estas são duas variáveis diferentes, a segunda das quais não tem um valor. Se você alterar esta segunda variável para "$ myVar ", o programa irá imprimir o seu valor para a tela
2
Exclua as linhas anteriores e digite o seguinte código: .
Use strict ;
$ myVar = " algum valor. ";
print $ myVar ;
Estas linhas gerar dois erros em tempo de execução , mesmo que as variáveis têm o mesmo nome , eles são utilizados duas vezes . Digitando " use strict " forças declaração explícita de todas as variáveis , referências e sub-rotinas
3
Exclua as linhas anteriores e digite o seguinte código: .
Use strict " vars " ;
my $ myVar = " algum valor. ";
print $ myVar ;
a primeira linha especifica que o programa exige apenas declaração de variáveis , mas não referências ou sub-rotinas . A " minha " palavra-chave declara variáveis locais. O código neste exemplo funciona exatamente como você quer que ele
4
Exclua as linhas anteriores e digite o seguinte código: .
Use strict;
my $ myVar = " algum valor. ";
print $ myVar ;
não " vars " estritas ;
$ MyVar2 = "Alguns novo valor. ";
print $ MyVar2 ;
A primeira linha exige declaração de variáveis , referências e sub-rotinas. A quarta linha pára o programa de exigir declaração estrito apenas para variáveis. Isso permite que a variável $ MyVar2 para ser usado sem declará-lo
5
Exclua as linhas anteriores e digite o seguinte código: .
Usar rígidas " refs " ;
$ myVar = " algum valor. ";
$ ref = " myVar ";
print $ $ ref ;
Observe que este exemplo especifica somente usar referências rigorosas , o que significa que não há problema em não declarar a variável aqui. Se você simplesmente usado " use strict " em vez disso, você teria que usar a " minha " palavra-chave na frente de ambos $ myVar e $ ref para declará-los . No entanto , a terceira linha ainda gera um erro porque você tentou usar $ ref como referência escalar
6
Exclua as linhas anteriores e digite o seguinte código: .
Usar rigorosa " refs " ;
$ myVar =" Algum valor "; .
$ ref = \\ $ myVar ;
print $ $ ref ;
A terceira linha neste exemplo usa a barra invertida para declarar a referência para a variável myVar $, que lhe permite usá-lo sem gerar um erro
7
Exclua as linhas anteriores e digite o seguinte código: . < br >
$ myVar = mySub ;
print $ myVar ;
Se " mySub " destina-se a ser uma sub-rotina que você ainda tem que definir , Perl atribui " mySub " como uma seqüência valor de US $ myVar e imprime essa palavra para a tela
8
Exclua as linhas anteriores e digite o seguinte código: .
usar rígidas " subs " ;
$ myVar = mySub ;
print $ myVar ;
A primeira linha exige sub-rotinas para ser declarado . Se você codificou " mySub " anteriormente no programa, o valor de retorno é atribuído a $ myVar , caso contrário, um erro de tempo de execução é gerado .