I Perl programmering, beskytter "strenge " søkeord mot utrygge dataoppsett . Det endrer noen av kode krav og instruerer tolk for å se etter visse andre søkeord . Ved hjelp av strenge erklæringer hjelper programmet å bedre forstå dine hensikter , for eksempel hvis du mener å bruke en subrutine for å tilordne verdier til en variabel , men glemmer å definere sub . I programmet, kan du angi streng deklarering av variabler , referanser , subrutiner , eller alle de ovennevnte . Du kan også slå på streng erklæring hvor som helst i programmet ved hjelp av " bruk strenge " søkeord og slå den av senere ved hjelp av " ingen strenge " søkeord . Instruksjoner
en
Åpne et Perl program fil . Skriv inn følgende kode :
$ myVar = " Noen verdi. ";
Print $ myvar ;
Merk at den første variabelen bruker en stor " V" og andre bruker en liten " v. " Denne koden genererer ikke en feil , men det gjør faktisk ikke skrive noe til skjermen. Fordi Perl variabler er store og små bokstaver , mener programmet disse er to forskjellige variabler, den andre som ikke har en verdi. Hvis du endrer denne andre variabelen til «$ myVar , " programmet vil skrive ut verdien til skjermen
2
Slett tidligere linjer og skriv inn følgende kode : .
Bruk streng ;
$ myVar = " Noen verdi. ";
print $ myVar ;
Disse linjene generere to run- time feil selv om variablene har samme navn , de er brukt to ganger. Skrive " bruke strenge " tvinger eksplisitt erklæring av alle variabler, referanser og subrutiner
3
Slett tidligere linjer og skriv inn følgende kode : .
Bruke strenge " vars " ;
mine $ myVar = " noen verdi . ";
print $ myVar ;
den første linjen angir at programmet bare krever deklarering av variabler , men ikke referanser eller subrutiner . Den " min " søkeord erklærer lokale variabler . Koden i dette eksempelet fungerer akkurat slik du vil ha det til
4
Slett tidligere linjer og skriv inn følgende kode :
bruke streng ;
min $ . myVar = " Noen verdi. ";
print $ myVar ;
ingen strenge " vars " ;
$ myVar2 = " Noen ny verdi . ";
< p> print $ myVar2 ;
Den første linjen krever deklarasjon av variabler, referanser og subrutiner . Den fjerde linjen stopper programmet fra å kreve streng erklæring for variabler bare . Dette gjør at $ myVar2 variabel som skal brukes uten å erklære det
5
Slett tidligere linjer og skriv inn følgende kode :
bruke strenge " refs ";
< p . > $ myVar = " Noen verdi. ";
$ ref = " myVar ";
print $ $ ref ;
Merk at dette eksempelet angir bare å bruke strenge referanser , noe som betyr at det er greit å ikke deklarere variabelen her . Hvis du bare brukt " bruke streng " i stedet , ville du må bruke " min " søkeord foran begge $ myVar og $ ref til å erklære dem . Men genererer den tredje linjen fortsatt en feil fordi du prøvde å bruke $ ref som en skalar referanse
6
Slett tidligere linjer og skriv inn følgende kode : .
Bruke strenge " refs ";
$ myVar =" Noen verdi "; .
$ ref = \\ $ myVar ;
print $ $ ref ;
tredje linje i dette eksemplet bruker omvendt skråstrek for å erklære referansen til $ myVar variabel, noe som gjør at du kan bruke den uten å generere en feil
7
Slett tidligere linjer og skriv inn følgende kode : .
$ myVar = mySub ;
print $ myVar ;
p Hvis " mySub " er ment å være noen subrutine at du har ennå å definere , tildeler Perl " mySub " som en streng verdi til $ myVar og utskrifter som ordet til skjermen
8
slette forrige linjene og skriv inn følgende kode :
bruk strenge " subs ";
. $ myVar = mySub ;
print $ myVar ;
første linje krever subrutiner til å bli erklært . Hvis du har kodet " mySub " tidligere i programmet , er returverdien fra det tildelt $ myVar , ellers en run -time feil genereres .
