V skriptovacích jazykoch shellu možno použiť dva typy premenných: jedným sú premenné shellu a druhým premenné prostredia. S premennými prostredia sa pracuje ako s globálnymi premennými pre skriptovacie jazyky. Údaje súvisiace s prostredím, ktoré sa používajú na spustenie skriptu, sú uložené v premenných prostredia. Tieto premenné sú uložené na základe páru kľúč – hodnota. Názov premennej je definovaný kľúčom, v ktorom je uložená hodnota premennej. Hodnota akejkoľvek premennej prostredia môže byť nastavená alebo prístupná pomocou skriptu Perl. Metódy prístupu a úpravy premenných prostredia pomocou skriptu Perl sú uvedené v tomto návode.
Použitie premenných prostredia v skripte Perl
Metódy prístupu ku konkrétnym alebo všetkým premenným prostredia a resetovaniu akejkoľvek premennej prostredia sú uvedené v tejto časti návodu.
Príklad 1: Vytlačte konkrétne premenné prostredia
Premenné prostredia sú uložené v poli %ENV, ktoré funguje ako asociatívne pole. Názov premennej je kľúčom poľa %ENV a hodnota je uložená v tomto konkrétnom kľúči. Vytvorte súbor Perl pomocou nasledujúceho skriptu, ktorý vytlačí tri premenné prostredia. Aktuálne prihlasovacie meno používateľa je uložené v premennej $ENV{‘USER’}. Aktuálna hodnota shellu je uložená v premennej $ENV{‘SHELL’}. Aktuálny pracovný adresár je uložený v premennej $ENV{‘PWD’}. Tieto tri premenné sú prístupné a vytlačené v skripte.
#!/local/bin/perl
používať prísne;
používať varovania;
použite 5.34.0;
#Vytlačte hodnoty troch premenných prostredia
povedať 'Používateľské meno je' . $ ENV { 'USER' } ;
povedať 'Aktuálny shell je' . $ ENV { „SHELL“ } ;
povedať 'Aktuálny pracovný adresár je' . $ ENV { 'PWD' } ;
Výkon:
Po vykonaní skriptu sa zobrazí nasledujúci podobný výstup:
Príklad 2: Vytlačte prvých päť premenných prostredia
Vytvorte súbor Perl pomocou nasledujúceho skriptu na čítanie prvých piatich hodnôt poľa %ENV, ktoré obsahuje všetky premenné prostredia. Slučka „foreach“ sa tu používa na čítanie všetkých premenných prostredia na základe zoradených hodnôt kľúča. Premenná „$counter“ sa používa v skripte na ukončenie cyklu po vytlačení piatich premenných prostredia. Premenná „$counter“ sa inkrementuje v každej iterácii cyklu a keď je hodnota „$counter“ 5, vykoná sa príkaz „last“ na opustenie cyklu.
#!/local/bin/perlpoužívať prísne;
používať varovania;
použite 5.34.0;
#Inicializujte počítadlo
môj $counter = 0 ;
# Iterujte slučku na čítanie všetkých premenných prostredia
pre každý ( triediť kľúče % ENV ) {
#Prečítajte si názov premennej prostredia
môj $kľúč = $_ ;
#Prečítajte hodnotu premennej prostredia
môj $value = $ ENV { $kľúč } ;
#Vytlačte názov premennej s hodnotou
povedať ' $kľúč => $value ' ;
#Zvýšte počítadlo
$counter ++;
#Skontrolujte hodnotu počítadla
ak ( $counter > = 5 )
{
#Ukončiť zo slučky
posledný ;
}
}
Výkon:
Po vykonaní skriptu sa zobrazí nasledujúci podobný výstup:
Príklad 3: Resetujte premennú prostredia
V predchádzajúcich príkladoch sa k preddefinovaným hodnotám premenných prostredia pristupuje individuálne a pomocou slučky. Hodnotu akejkoľvek premennej prostredia je však možné zmeniť pomocou skriptu Perl. Vytvorte súbor Perl pomocou nasledujúceho skriptu, ktorý vytlačí umiestnenie HOME, zmení umiestnenie na „/temp/files“ a po aktualizácii znova vytlačí umiestnenie HOME.
#!/local/bin/perlpoužívať prísne;
používať varovania;
použite 5.34.0;
#Vytlačte hodnotu konkrétnej premennej prostredia
povedať 'Aktuálna hodnota HOME je' . $ ENV { 'DOMOV' } ;
#Resetujte premennú prostredia
$ ENV { 'DOMOV' } = '/temp/files' ;
# Po aktualizácii vytlačte hodnotu konkrétnej premennej prostredia
povedať 'Aktuálna hodnota HOME je' . $ ENV { 'DOMOV' } ;
Výkon:
Po vykonaní skriptu sa zobrazí nasledujúci podobný výstup:
Príklad 4: Tlač premenných prostredia s formátovaním
Vytvorte súbor Perl pomocou nasledujúceho skriptu, ktorý vytlačí premenné prostredia s formátovaním pomocou funkcie printf(). Tu sa slučka „foreach“ používa na čítanie všetkých premenných prostredia ako v predchádzajúcom príklade. Pár kľúč – hodnota premennej prostredia sa vytlačí pridaním dvojbodky (:) medzi kľúč a hodnotu a ponechaním medzery 15 znakov pre kľúč.
#!/local/bin/perlpoužívať prísne;
používať varovania;
použite 5.34.0;
# Iterujte slučku na čítanie všetkých premenných prostredia
foreach my tis ( triediť kľúče % ENV ) {
# Vytlačte naformátovaný výstup premenných prostredia
printf ( '%15s: %s.' \n ' , tis , $ ENV { tis } ) ;
}
Výkon:
Nasledujúci podobný výstup sa zobrazí po vykonaní skriptu. Niektoré časti na začiatku výstupu sú zobrazené tu:
Záver
Premenné prostredia sa používajú na rôzne účely a niekedy je potrebné zmeniť aktuálnu hodnotu konkrétnej premennej prostredia na akýkoľvek programovací účel. Metódy na získanie a nastavenie hodnôt premenných prostredia pomocou skriptu Perl sú uvedené v príkladoch tohto návodu, ktorý pomôže používateľom Perlu.