In shell-scripttalen kunnen twee soorten variabelen worden gebruikt: de ene zijn de shell-variabelen en de andere zijn de omgevingsvariabelen. De omgevingsvariabelen worden gebruikt als de globale variabelen voor de scripttalen. De omgevingsgerelateerde gegevens die worden gebruikt om het script uit te voeren, worden opgeslagen in de omgevingsvariabelen. Deze variabelen worden opgeslagen op basis van het sleutel-waardepaar. De naam van de variabele wordt gedefinieerd door de sleutel waarin de waarde van de variabele is opgeslagen. De waarde van elke omgevingsvariabele kan worden ingesteld of geopend via het Perl-script. De methoden voor het benaderen en wijzigen van de omgevingsvariabelen met behulp van het Perl-script worden in deze zelfstudie getoond.
Gebruik van de omgevingsvariabelen in het Perl-script
De methoden voor toegang tot de specifieke of alle omgevingsvariabelen en het opnieuw instellen van omgevingsvariabelen worden in dit deel van de zelfstudie getoond.
Voorbeeld 1: Druk de specifieke omgevingsvariabelen af
De omgevingsvariabelen worden opgeslagen in de %ENV-array die werkt als de associatieve array. De variabelenaam is de sleutel van de %ENV-array en de waarde wordt in die specifieke sleutel opgeslagen. Maak een Perl-bestand met het volgende script dat drie omgevingsvariabelen afdrukt. De huidige gebruikersnaam wordt opgeslagen in de variabele $ENV{‘USER’}. De huidige shell-waarde wordt opgeslagen in de variabele $ENV{‘SHELL’}. De huidige werkmap wordt opgeslagen in de variabele $ENV{‘PWD’}. Deze drie variabelen worden in het script benaderd en afgedrukt.
#!/local/bin/perl
gebruik strikt;
gebruik waarschuwingen;
gebruik 5.34.0;
#Print de waarden van drie omgevingsvariabelen
inspraak 'Gebruikersnaam is' . $ENV { 'GEBRUIKER' } ;
inspraak 'Huidige schil is' . $ENV { 'SCHELP' } ;
inspraak 'Huidige werkmap is ' . $ENV { 'PWD' } ;
Uitgang:
De volgende soortgelijke uitvoer verschijnt na het uitvoeren van het script:
Voorbeeld 2: Druk de eerste vijf omgevingsvariabelen af
Maak een Perl-bestand met het volgende script om de eerste vijf waarden van de %ENV-array te lezen die alle omgevingsvariabelen bevat. Hier wordt de “foreach”-lus gebruikt om alle omgevingsvariabelen te lezen op basis van de gesorteerde sleutelwaarden. De variabele “$counter” wordt in het script gebruikt om de lus te beëindigen na het afdrukken van de vijf omgevingsvariabelen. De variabele “$counter” wordt bij elke iteratie van de lus verhoogd en wanneer de waarde van “$counter” 5 is, wordt de “last”-instructie uitgevoerd om de lus te verlaten.
#!/local/bin/perlgebruik strikt;
gebruik waarschuwingen;
gebruik 5.34.0;
#Initialiseer de teller
Mijn $teller = 0 ;
#Herhaal de lus om alle omgevingsvariabelen te lezen
voorleggen ( soort sleutels % ENV ) {
#Lees de naam van de omgevingsvariabele
Mijn $ sleutel = $_ ;
#Lees de waarde van de omgevingsvariabele
Mijn $waarde = $ENV { $ sleutel } ;
#Print de variabelenaam met de waarde
inspraak ' $ sleutel => $waarde ' ;
#Verhoog de teller
$teller ++;
#Controleer de tellerwaarde
als ( $teller > = 5 )
{
#Beëindig de lus
laatst ;
}
}
Uitgang:
De volgende soortgelijke uitvoer verschijnt na het uitvoeren van het script:
Voorbeeld 3: Reset de omgevingsvariabele
In de voorgaande voorbeelden zijn de vooraf gedefinieerde waarden van de omgevingsvariabelen afzonderlijk toegankelijk via een lus. De waarde van elke omgevingsvariabele kan echter worden gewijzigd met behulp van het Perl-script. Maak een Perl-bestand met het volgende script dat de locatie van de HOME afdrukt, de locatie verandert in “/temp/files” en de locatie van de HOME opnieuw afdrukt na de update.
#!/local/bin/perlgebruik strikt;
gebruik waarschuwingen;
gebruik 5.34.0;
#Print de waarde van de specifieke omgevingsvariabele
inspraak 'De huidige waarde van de HOME is ' . $ENV { 'THUIS' } ;
#Reset de omgevingsvariabele
$ENV { 'THUIS' } = '/temp/bestanden' ;
#Print de waarde van de specifieke omgevingsvariabele na de update
inspraak 'De huidige waarde van de HOME is ' . $ENV { 'THUIS' } ;
Uitgang:
De volgende soortgelijke uitvoer verschijnt na het uitvoeren van het script:
Voorbeeld 4: Druk de omgevingsvariabelen af met opmaak
Maak een Perl-bestand met het volgende script dat de omgevingsvariabelen afdrukt met opmaak met behulp van de printf() functie. Hier wordt de “foreach”-lus gebruikt om alle omgevingsvariabelen te lezen, zoals in het vorige voorbeeld. Het sleutel-waardepaar van de omgevingsvariabele wordt afgedrukt door de dubbele punt(:) tussen de sleutel en de waarde toe te voegen, en een spatie van 15 tekens voor de sleutel te behouden.
#!/local/bin/perlgebruik strikt;
gebruik waarschuwingen;
gebruik 5.34.0;
#Herhaal de lus om alle omgevingsvariabelen te lezen
voorzie mijn $k ( soort sleutels % ENV ) {
#Print de opgemaakte uitvoer van de omgevingsvariabelen
afdrukkenf ( '%15s: %s \N ' , $k , $ENV { $k } ) ;
}
Uitgang:
De volgende soortgelijke uitvoer verschijnt na het uitvoeren van het script. Enkele gedeelten aan het begin van de uitvoer worden hier weergegeven:
Conclusie
De omgevingsvariabelen worden voor verschillende doeleinden gebruikt en het is soms nodig om de huidige waarde van de specifieke omgevingsvariabele te wijzigen voor welk programmeerdoel dan ook. De methoden om de waarden van de omgevingsvariabelen op te halen en in te stellen met behulp van het Perl-script worden getoond in de voorbeelden van deze tutorial om de Perl-gebruikers te helpen.