Deux types de variables peuvent être utilisés dans les langages de script shell : l'un est constitué par les variables shell et l'autre est constitué par les variables d'environnement. Les variables d'environnement fonctionnent comme des variables globales pour les langages de script. Les données liées à l'environnement utilisées pour exécuter le script sont stockées dans les variables d'environnement. Ces variables sont stockées en fonction de la paire clé-valeur. Le nom de la variable est défini par la clé qui stocke la valeur de la variable. La valeur de n'importe quelle variable d'environnement peut être définie ou accessible par le script Perl. Les méthodes d'accès et de modification des variables d'environnement à l'aide du script Perl sont présentées dans ce didacticiel.
Utilisations des variables d'environnement dans le script Perl
Les méthodes d'accès à une ou à toutes les variables d'environnement et de réinitialisation de toute variable d'environnement sont présentées dans cette partie du didacticiel.
Exemple 1 : imprimer les variables d'environnement particulières
Les variables d'environnement sont stockées dans le tableau %ENV qui fonctionne comme le tableau associatif. Le nom de la variable est la clé du tableau %ENV et la valeur est stockée dans cette clé particulière. Créez un fichier Perl avec le script suivant qui imprime trois variables d'environnement. Le nom d'utilisateur de connexion actuel est stocké dans la variable $ENV{'USER'}. La valeur actuelle du shell est stockée dans la variable $ENV{'SHELL'}. Le répertoire de travail actuel est stocké dans la variable $ENV{'PWD'}. Ces trois variables sont accessibles et imprimées dans le script.
#!/local/bin/perl
utilisez strict ;
utiliser des avertissements ;
utilisez 5.34.0 ;
#Imprimer les valeurs de trois variables d'environnement
dire 'Le nom d'utilisateur est ' . $ENV { 'UTILISATEUR' } ;
dire 'Le shell actuel est' . $ENV { 'COQUILLE' } ;
dire 'Le répertoire de travail actuel est ' . $ENV { 'PWD' } ;
Sortir:
La sortie similaire suivante apparaît après l'exécution du script :
Exemple 2 : imprimer les cinq premières variables d'environnement
Créez un fichier Perl avec le script suivant pour lire les cinq premières valeurs du tableau %ENV qui contient toutes les variables d'environnement. Ici, la boucle « foreach » est utilisée pour lire toutes les variables d'environnement en fonction des valeurs clés triées. La variable « $counter » est utilisée dans le script pour terminer la boucle après avoir imprimé les cinq variables d'environnement. La variable « $counter » est incrémentée à chaque itération de la boucle et lorsque la valeur de « $counter » est 5, la « dernière » instruction est exécutée pour sortir de la boucle.
#!/local/bin/perlutilisez strict ;
utiliser des avertissements ;
utilisez 5.34.0 ;
#Initialiser le compteur
mon Compteur $ = 0 ;
#Itérer la boucle pour lire toutes les variables d'environnement
pour chaque ( trier clés % ENV ) {
#Lire le nom de la variable d'environnement
mon $clé = $_ ;
#Lire la valeur de la variable d'environnement
mon valeur $ = $ENV { $clé } ;
#Imprime le nom de la variable avec la valeur
dire ' $clé => valeur $ ' ;
#Incrémenter le compteur
Compteur $ ++ ;
#Vérifiez la valeur du compteur
si ( Compteur $ > = 5 )
{
#Terminer de la boucle
dernier ;
}
}
Sortir:
La sortie similaire suivante apparaît après l'exécution du script :
Exemple 3 : réinitialiser la variable d'environnement
Dans les exemples précédents, les valeurs prédéfinies des variables d'environnement sont accessibles individuellement et à l'aide d'une boucle. Cependant, la valeur de n'importe quelle variable d'environnement peut être modifiée à l'aide du script Perl. Créez un fichier Perl avec le script suivant qui imprime l'emplacement du HOME, modifie l'emplacement en « /temp/files » et imprime à nouveau l'emplacement du HOME après la mise à jour.
#!/local/bin/perlutilisez strict ;
utiliser des avertissements ;
utilisez 5.34.0 ;
#Imprimer la valeur d'une variable d'environnement particulière
dire 'La valeur actuelle de HOME est ' . $ENV { 'MAISON' } ;
#Réinitialiser la variable d'environnement
$ENV { 'MAISON' } = '/temp/fichiers' ;
#Imprimer la valeur de la variable d'environnement particulière après la mise à jour
dire 'La valeur actuelle de HOME est ' . $ENV { 'MAISON' } ;
Sortir:
La sortie similaire suivante apparaît après l'exécution du script :
Exemple 4 : imprimer les variables d'environnement avec formatage
Créez un fichier Perl avec le script suivant qui imprime les variables d'environnement avec formatage à l'aide de la fonction printf(). Ici, la boucle « foreach » est utilisée pour lire toutes les variables d'environnement comme dans l'exemple précédent. La paire clé-valeur de la variable d'environnement est imprimée en ajoutant les deux points (:) entre la clé et la valeur, et en conservant un espace de 15 caractères pour la clé.
#!/local/bin/perlutilisez strict ;
utiliser des avertissements ;
utilisez 5.34.0 ;
#Itérer la boucle pour lire toutes les variables d'environnement
pour atteindre mon k$ ( trier clés % ENV ) {
#Imprimer la sortie formatée des variables d'environnement
imprimer ( '%15s : %s \n ' , k$ , $ENV { k$ } ) ;
}
Sortir:
La sortie similaire suivante apparaît après l’exécution du script. Certaines parties au début de la sortie sont affichées ici :
Conclusion
Les variables d'environnement sont utilisées à des fins différentes et il est parfois nécessaire de modifier la valeur actuelle d'une variable d'environnement particulière à des fins de programmation. Les méthodes pour obtenir et définir les valeurs des variables d'environnement à l'aide du script Perl sont présentées dans les exemples de ce didacticiel pour aider les utilisateurs de Perl.