In Perl programmering , de " strikte " keyword beschermt tegen onveilige data constructies . Het verandert een aantal van de eisen van de code en instrueert de tolk te zoeken naar bepaalde andere trefwoorden . Met behulp van strikte verklaringen helpt uw programma om beter te begrijpen uw bedoelingen , zoals als je bedoelt om een subroutine gebruiken om waarden toe te kennen aan een variabele , maar vergeten om de sub te definiëren . In uw programma , kunt u strenge verklaring van variabelen , referenties , subroutines , of al het bovenstaande te geven . U kunt ook inschakelen strikte verklaring ergens in het programma met de " strikte toepassing " trefwoorden en zet hem uit later met behulp van de " geen strikte " trefwoorden . Instructies
1 Open een Perl-programma bestand . Typ de volgende code : $ myVar
= " Sommige value . " ; Druk
$ myvar ; notitiekaarten dat de eerste variabele maakt gebruik van een hoofdletter "V " en de tweede maakt gebruik van een kleine " v. " Deze code maakt geen fouten , maar het doet niet echt iets op het scherm te drukken . Omdat Perl variabelen zijn hoofdlettergevoelig , het programma denkt dat zijn twee verschillende variabelen , waarvan de tweede geen waarde hebben . Als je deze tweede variabele te wijzigen in " $ myVar , " zal het programma zijn waarde om het scherm af te drukken kopen van 2 Verwijder de vorige lijnen en typ de volgende code : . Gebruik
strikte ; $ myVar
= " Sommige value . " ; druk
$ myVar ;
Deze lijnen genereren twee run - time fouten , hoewel de variabelen dezelfde naam hebben , ze twee keer gebruikt . Typering " use strict " krachten expliciete verklaring van alle variabelen , verwijzingen en subroutines
3 Verwijder de vorige lijnen en typ de volgende code : .
Gebruiken strikte " vars " ;
mijn $ myVar = " Sommige value . " ; druk
$ myVar ;
de eerste regel geeft aan dat het programma vereist enige verklaring van variabelen , maar niet verwijzingen of subroutines . De " mijn " keyword verklaart lokale variabelen . De code in dit voorbeeld werkt precies zoals u het wilt
4 Verwijder de vorige lijnen en typ de volgende code :
use strict;
mijn $ . myVar = "Sommige value . " ; druk
$ myVar ;
geen strikte " vars " ;
$ myVar2 = "Sommige nieuwe waarde . " ;
print $ myVar2 ;
De eerste regel vereist verklaring van variabelen , referenties en subroutines . De vierde lijn stopt het programma van eisen strikte verklaring voor enige variabelen . Hierdoor kan de variabele $ myVar2 om gebruikt te worden zonder aangifte
5 Verwijder de vorige lijnen en typ de volgende code :
use strict " refs " ;
$ myVar = " Sommige value . " ; $ ref
= " myVar " ; afdruk $ $ ref
; notitiekaarten dat dit voorbeeld worden alleen aan strikte referenties gebruiken , wat betekent dat het goed is om hier niet verklaren variabele . Als je gewoon gebruik " use strict " plaats , zou je de " mijn " keyword te gebruiken voor zowel $ myVar en $ ref om ze te verklaren . Echter , de derde regel genereert nog steeds een fout omdat je geprobeerd om $ ref gebruiken als een scalair verwijzing
6 Verwijder de vorige lijnen en typ de volgende code : .
Gebruiken strikte " refs " ; $ myVar
= " Sommige value " ; . $ ref = \\ $ myVar
; afdruk $ $ ref
;
Het derde regel in dit voorbeeld wordt de backslash om de verwijzing te verklaren aan de $ myVar variabele , die u toestaat om het te gebruiken zonder dat een fout
7 Verwijder de vorige lijnen en typ de volgende code : . < br > $ myVar = MySub ; afdruk $ myVar
;
als " MySub " is bedoeld om een aantal subroutine die jullie nog moeten definiëren , Perl kent " MySub " als een string waarde tot $ myVar en prenten dat woord aan het scherm
8 Verwijder de vorige lijnen en typ de volgende code : gebruik strikte " subs "
;
. $ myVar = MySub ; afdruk
$ myVar ;
De eerste regel vereist subroutines te worden verklaard . Als je " MySub " hebben gecodeerd eerder in het programma , wordt de return waarde van het toegewezen aan $ myVar , anders een run - time fout wordt gegenereerd .
|
