Nei linguaggi di scripting della shell possono essere utilizzati due tipi di variabili: una sono le variabili di shell e l'altra sono le variabili di ambiente. Le variabili di ambiente vengono utilizzate come variabili globali per i linguaggi di scripting. I dati relativi all'ambiente utilizzati per eseguire lo script vengono archiviati nelle variabili di ambiente. Queste variabili vengono archiviate in base alla coppia chiave-valore. Il nome della variabile è definito dalla chiave che memorizza il valore della variabile. Il valore di qualsiasi variabile di ambiente può essere impostato o accessibile tramite lo script Perl. I metodi per accedere e modificare le variabili di ambiente utilizzando lo script Perl sono mostrati in questo tutorial.
Usi delle variabili d'ambiente nello script Perl
I metodi per accedere a una particolare o a tutte le variabili di ambiente e reimpostare qualsiasi variabile di ambiente sono mostrati in questa parte del tutorial.
Esempio 1: stampare le variabili d'ambiente particolari
Le variabili d'ambiente sono memorizzate nell'array %ENV che funziona come l'array associativo. Il nome della variabile è la chiave dell'array %ENV e il valore è memorizzato in quella particolare chiave. Crea un file Perl con il seguente script che stampa tre variabili di ambiente. Il nome utente di accesso corrente è memorizzato nella variabile $ENV{'USER'}. Il valore corrente della shell è memorizzato nella variabile $ENV{'SHELL'}. La directory di lavoro corrente è memorizzata nella variabile $ENV{'PWD'}. È possibile accedere a queste tre variabili e stamparle nello script.
#!/local/bin/perl
utilizzare rigoroso;
utilizzare gli avvertimenti;
utilizzare 5.34.0;
#Stampa i valori di tre variabili d'ambiente
Dire 'Il nome utente è' . $ENV { 'UTENTE' } ;
Dire 'La shell corrente è' . $ENV { 'CONCHIGLIA' } ;
Dire 'La directory di lavoro corrente è' . $ENV { 'PWD' } ;
Produzione:
Il seguente output simile viene visualizzato dopo l'esecuzione dello script:
Esempio 2: stampare le prime cinque variabili d'ambiente
Crea un file Perl con il seguente script per leggere i primi cinque valori dell'array %ENV che contiene tutte le variabili di ambiente. Qui, il ciclo 'foreach' viene utilizzato per leggere tutte le variabili di ambiente in base ai valori chiave ordinati. La variabile '$counter' viene utilizzata nello script per terminare il ciclo dopo aver stampato le cinque variabili di ambiente. La variabile “$counter” viene incrementata in ogni iterazione del ciclo e quando il valore di “$counter” è 5, viene eseguita l'istruzione “last” per uscire dal ciclo.
#!/local/bin/perlutilizzare rigoroso;
utilizzare gli avvertimenti;
utilizzare 5.34.0;
#Inizializza il contatore
Mio $contatore = 0 ;
#Iterate il ciclo per leggere tutte le variabili d'ambiente
per ciascuno ( ordinare chiavi % ENV ) {
#Leggi il nome della variabile d'ambiente
Mio $chiave = $_ ;
#Leggi il valore della variabile d'ambiente
Mio $valore = $ENV { $chiave } ;
#Stampa il nome della variabile con il valore
Dire ' $chiave => $valore ' ;
#Incrementa il contatore
$contatore ++;
#Controllare il valore del contatore
Se ( $contatore > = 5 )
{
#Terminare dal ciclo
scorso ;
}
}
Produzione:
Il seguente output simile viene visualizzato dopo l'esecuzione dello script:
Esempio 3: reimpostare la variabile d'ambiente
Negli esempi precedenti, si accede ai valori predefiniti delle variabili di ambiente individualmente e utilizzando un ciclo. Tuttavia, il valore di qualsiasi variabile d'ambiente può essere modificato utilizzando lo script Perl. Crea un file Perl con il seguente script che stampa la posizione di HOME, cambia la posizione in '/temp/files' e stampa nuovamente la posizione di HOME dopo l'aggiornamento.
#!/local/bin/perlutilizzare rigoroso;
utilizzare gli avvertimenti;
utilizzare 5.34.0;
#Stampa il valore della particolare variabile d'ambiente
Dire 'Il valore attuale della CASA è ' . $ENV { 'CASA' } ;
#Reimposta la variabile d'ambiente
$ENV { 'CASA' } = '/temp/file' ;
#Stampa il valore della particolare variabile d'ambiente dopo l'aggiornamento
Dire 'Il valore attuale della CASA è ' . $ENV { 'CASA' } ;
Produzione:
Il seguente output simile viene visualizzato dopo l'esecuzione dello script:
Esempio 4: stampare le variabili d'ambiente con la formattazione
Crea un file Perl con il seguente script che stampa le variabili di ambiente con formattazione utilizzando la funzione printf(). Qui, il ciclo “foreach” viene utilizzato per leggere tutte le variabili d'ambiente come nell'esempio precedente. La coppia chiave-valore della variabile d'ambiente viene stampata aggiungendo i due punti (:) tra la chiave e il valore e mantenendo uno spazio di 15 caratteri per la chiave.
#!/local/bin/perlutilizzare rigoroso;
utilizzare gli avvertimenti;
utilizzare 5.34.0;
#Iterate il ciclo per leggere tutte le variabili d'ambiente
per ogni mio $ k ( ordinare chiavi % ENV ) {
#Stampa l'output formattato delle variabili d'ambiente
printf ( '%15s: %s \N ' , $ k , $ENV { $ k } ) ;
}
Produzione:
Il seguente output simile viene visualizzato dopo l'esecuzione dello script. Alcune parti all'inizio dell'output sono mostrate qui:
Conclusione
Le variabili d'ambiente vengono utilizzate per scopi diversi e talvolta è necessario modificare il valore corrente della particolare variabile d'ambiente per qualsiasi scopo di programmazione. I metodi per ottenere e impostare i valori delle variabili d'ambiente utilizzando lo script Perl sono mostrati negli esempi di questo tutorial per aiutare gli utenti Perl.