Perl Environment Variables

Perl Environment Variables



Dalawang uri ng mga variable ang maaaring gamitin sa mga wika ng shell scripting: ang isa ay ang shell variable at ang isa ay ang environment variable. Ang mga variable ng kapaligiran ay gumagana bilang mga pandaigdigang variable para sa mga wika ng script. Ang data na nauugnay sa kapaligiran na ginagamit upang maisagawa ang script ay iniimbak sa mga variable ng kapaligiran. Ang mga variable na ito ay iniimbak batay sa key-value pair. Ang pangalan ng variable ay tinutukoy ng key na nag-iimbak ng halaga ng variable. Ang halaga ng anumang environment variable ay maaaring itakda o ma-access ng Perl script. Ang mga paraan ng pag-access at pagbabago ng mga variable ng kapaligiran gamit ang Perl script ay ipinapakita sa tutorial na ito.

Mga Paggamit ng Environment Variable sa Perl Script

Ang mga paraan ng pag-access sa partikular o lahat ng mga variable ng kapaligiran at pag-reset ng anumang variable ng kapaligiran ay ipinapakita sa bahaging ito ng tutorial.







Halimbawa 1: I-print ang Partikular na Mga Variable sa Kapaligiran



Ang mga variable ng kapaligiran ay naka-imbak sa %ENV array na gumagana tulad ng associative array. Ang variable na pangalan ay ang susi ng %ENV array at ang halaga ay nakaimbak sa partikular na key na iyon. Gumawa ng Perl file na may sumusunod na script na nagpi-print ng tatlong environment variable. Ang kasalukuyang username sa pag-log in ay nakaimbak sa variable na $ENV{‘USER’}. Ang kasalukuyang halaga ng shell ay nakaimbak sa variable na $ENV{‘SHELL'}. Ang kasalukuyang gumaganang direktoryo ay naka-imbak sa variable na $ENV{‘PWD’}. Ang tatlong variable na ito ay ina-access at naka-print sa script.



#!/local/bin/perl

gumamit ng mahigpit;
gumamit ng mga babala;
gumamit ng 5.34.0;

#Print ang mga value ng tatlong environment variable
sabihin 'Ang username ay' . $ENV { 'USER' } ;
sabihin 'Ang kasalukuyang shell ay' . $ENV { 'SHELL' } ;
sabihin 'Ang kasalukuyang gumaganang direktoryo ay ' . $ENV { 'PWD' } ;





Output:

Ang sumusunod na katulad na output ay lilitaw pagkatapos isagawa ang script:



Halimbawa 2: I-print ang Unang Limang Environment Variable

Gumawa ng Perl file na may sumusunod na script para basahin ang unang limang value ng %ENV array na naglalaman ng lahat ng environment variable. Dito, ang 'foreach' na loop ay ginagamit upang basahin ang lahat ng mga variable ng kapaligiran batay sa mga pinagsunod-sunod na key value. Ang variable na '$counter' ay ginagamit sa script upang wakasan ang loop pagkatapos i-print ang limang variable ng kapaligiran. Ang variable na '$counter' ay dinadagdagan sa bawat pag-ulit ng loop at kapag ang halaga ng '$counter' ay 5, ang 'huling' statement ay isasagawa upang lumabas sa loop.

#!/local/bin/perl

gumamit ng mahigpit;
gumamit ng mga babala;
gumamit ng 5.34.0;

#Initialize ang counter
aking $counter = 0 ;
#Iterate ang loop para basahin ang lahat ng environment variable
foreach ( uri mga susi % ENV ) {
#Basahin ang pangalan ng variable ng kapaligiran
aking $key = $_ ;
#Basahin ang halaga ng variable ng kapaligiran
aking $halaga = $ENV { $key } ;
#I-print ang pangalan ng variable na may halaga
sabihin ' $key => $halaga ' ;
#Palakihin ang counter
$counter ++;
#Suriin ang halaga ng counter
kung ( $counter > = 5 )
{
#Wakasan mula sa loop
huli ;
}
}

Output:

Ang sumusunod na katulad na output ay lilitaw pagkatapos isagawa ang script:

Halimbawa 3: I-reset ang Environment Variable

Sa mga nakaraang halimbawa, ang mga paunang natukoy na halaga ng mga variable ng kapaligiran ay ina-access nang isa-isa at gamit ang isang loop. Gayunpaman, maaaring baguhin ang halaga ng anumang environment variable gamit ang Perl script. Gumawa ng Perl file na may sumusunod na script na nagpi-print ng lokasyon ng HOME, binabago ang lokasyon sa '/temp/files', at muling nagpi-print ng lokasyon ng HOME pagkatapos ng update.

#!/local/bin/perl

gumamit ng mahigpit;
gumamit ng mga babala;
gumamit ng 5.34.0;


#I-print ang halaga ng partikular na variable ng kapaligiran
sabihin 'Ang kasalukuyang halaga ng HOME ay ' . $ENV { 'BAHAY' } ;

#I-reset ang variable ng kapaligiran
$ENV { 'BAHAY' } = '/temp/files' ;

#Print ang value ng partikular na environment variable pagkatapos ng update
sabihin 'Ang kasalukuyang halaga ng HOME ay ' . $ENV { 'BAHAY' } ;

Output:

Ang sumusunod na katulad na output ay lilitaw pagkatapos isagawa ang script:

Halimbawa 4: I-print ang Mga Variable ng Environment na may Formatting

Gumawa ng Perl file na may sumusunod na script na nagpi-print ng mga variable ng kapaligiran na may pag-format gamit ang printf() function. Dito, ang 'foreach' na loop ay ginagamit upang basahin ang lahat ng mga variable ng kapaligiran tulad ng sa nakaraang halimbawa. Ang key-value pair ng environment variable ay naka-print sa pamamagitan ng pagdaragdag ng colon(:) sa pagitan ng key at value, at pagpapanatili ng space na 15 character para sa key.

#!/local/bin/perl

gumamit ng mahigpit;
gumamit ng mga babala;
gumamit ng 5.34.0;

#Iterate ang loop upang basahin ang lahat ng mga variable ng kapaligiran
foreach my $k ( uri mga susi % ENV ) {
#I-print ang na-format na output ng mga variable ng kapaligiran
printf ( '%15s : %s \n ' , $k , $ENV { $k } ) ;
}

Output:

Ang sumusunod na katulad na output ay lilitaw pagkatapos isagawa ang script. Ang ilang bahagi sa simula ng output ay ipinapakita dito:

Konklusyon

Ang mga variable ng kapaligiran ay ginagamit para sa iba't ibang layunin at kung minsan ay kinakailangan na baguhin ang kasalukuyang halaga ng partikular na variable ng kapaligiran para sa anumang layunin ng programming. Ang mga paraan upang makuha at itakda ang mga halaga ng mga variable ng kapaligiran gamit ang Perl script ay ipinapakita sa mga halimbawa ng tutorial na ito upang matulungan ang mga gumagamit ng Perl.