To typer variabler kan brukes i shell-skriptspråk: den ene er shell-variablene og den andre er miljøvariablene. Miljøvariablene fungerer som de globale variablene for skriptspråkene. De miljørelaterte dataene som brukes til å kjøre skriptet, lagres i miljøvariablene. Disse variablene lagres basert på nøkkelverdi-paret. Navnet på variabelen er definert av nøkkelen som lagrer variabelens verdi. Verdien til en hvilken som helst miljøvariabel kan angis eller åpnes av Perl-skriptet. Metodene for å få tilgang til og endre miljøvariablene ved å bruke Perl-skriptet er vist i denne opplæringen.
Bruk av miljøvariablene i Perl-skriptet
Metodene for å få tilgang til de bestemte eller alle miljøvariablene og tilbakestille enhver miljøvariabel er vist i denne delen av opplæringen.
Eksempel 1: Skriv ut de spesielle miljøvariablene
Miljøvariablene lagres i %ENV-matrisen som fungerer som den assosiative matrisen. Variabelnavnet er nøkkelen til %ENV-matrisen, og verdien er lagret i den aktuelle nøkkelen. Lag en Perl-fil med følgende skript som skriver ut tre miljøvariabler. Det gjeldende brukernavnet for pålogging er lagret i $ENV{‘USER’}-variabelen. Den gjeldende shell-verdien er lagret i $ENV{‘SHELL’}-variabelen. Den gjeldende arbeidskatalogen er lagret i $ENV{‘PWD’}-variabelen. Disse tre variablene åpnes og skrives ut i skriptet.
#!/local/bin/perl
bruk streng;
bruk advarsler;
bruk 5.34.0;
#Skriv ut verdiene til tre miljøvariabler
si 'Brukernavn er' . $ENV { 'BRUKER' } ;
si 'Nåværende skall er' . $ENV { 'SHELL' } ;
si 'Gjeldende arbeidskatalog er' . $ENV { 'PWD' } ;
Produksjon:
Følgende lignende utgang vises etter utføring av skriptet:
Eksempel 2: Skriv ut de fem første miljøvariablene
Lag en Perl-fil med følgende skript for å lese de fem første verdiene til %ENV-matrisen som inneholder alle miljøvariabler. Her brukes 'foreach'-løkken til å lese alle miljøvariabler basert på de sorterte nøkkelverdiene. Variabelen '$counter' brukes i skriptet for å avslutte loopen etter at de fem miljøvariablene er skrevet ut. '$counter'-variabelen økes i hver iterasjon av sløyfen, og når verdien til '$counter' er 5, utføres 'siste'-setningen for å gå ut av løkken.
#!/local/bin/perlbruk streng;
bruk advarsler;
bruk 5.34.0;
#Initialiser telleren
min $teller = 0 ;
#Iterer loopen for å lese alle miljøvariabler
for hver ( sortere nøkler % ENV ) {
#Les navnet på miljøvariabelen
min $nøkkel = $_ ;
#Les verdien av miljøvariabelen
min $verdi = $ENV { $nøkkel } ;
#Skriv ut variabelnavnet med verdien
si ' $nøkkel => $verdi ' ;
#Øk telleren
$teller ++;
#Sjekk tellerverdien
hvis ( $teller > = 5 )
{
#Avslutt fra loopen
siste ;
}
}
Produksjon:
Følgende lignende utgang vises etter utføring av skriptet:
Eksempel 3: Tilbakestill miljøvariabelen
I de foregående eksemplene er de forhåndsdefinerte verdiene til miljøvariablene åpnet individuelt og ved hjelp av en loop. Verdien til enhver miljøvariabel kan imidlertid endres ved hjelp av Perl-skriptet. Lag en Perl-fil med følgende skript som skriver ut plasseringen av HOME, endrer plasseringen til '/temp/files', og skriver ut plasseringen til HOME igjen etter oppdateringen.
#!/local/bin/perlbruk streng;
bruk advarsler;
bruk 5.34.0;
#Skriv ut verdien til den bestemte miljøvariabelen
si 'Gjeldende verdi av HOME er' . $ENV { 'HJEM' } ;
#Tilbakestill miljøvariabelen
$ENV { 'HJEM' } = '/temp/filer' ;
#Skriv ut verdien til den bestemte miljøvariabelen etter oppdateringen
si 'Gjeldende verdi av HOME er' . $ENV { 'HJEM' } ;
Produksjon:
Følgende lignende utgang vises etter utføring av skriptet:
Eksempel 4: Skriv ut miljøvariablene med formatering
Lag en Perl-fil med følgende skript som skriver ut miljøvariablene med formatering ved å bruke printf()-funksjonen. Her brukes 'foreach'-løkken til å lese alle miljøvariabler som i forrige eksempel. Nøkkelverdi-paret til miljøvariabelen skrives ut ved å legge til kolon(:) mellom nøkkelen og verdien, og beholde et mellomrom på 15 tegn for nøkkelen.
#!/local/bin/perlbruk streng;
bruk advarsler;
bruk 5.34.0;
#Iterer loopen for å lese alle miljøvariabler
foreach min $k ( sortere nøkler % ENV ) {
#Skriv ut den formaterte utdataene til miljøvariablene
printf ( '%15s : %s \n ' , $k , $ENV { $k } ) ;
}
Produksjon:
Følgende lignende utgang vises etter utføring av skriptet. Noen deler i begynnelsen av utgangen vises her:
Konklusjon
Miljøvariablene brukes til forskjellige formål, og det er noen ganger nødvendig å endre gjeldende verdi av den bestemte miljøvariabelen for ethvert programmeringsformål. Metodene for å hente og angi verdiene til miljøvariablene ved å bruke Perl-skriptet er vist i eksemplene i denne opplæringen for å hjelpe Perl-brukerne.