Accueil de Gladir.com Notes légales de Gladir.com Flux RSS des nouvelles du site Gladir.com - Langage de programmation - Perl - Visualiser les variables d'environnement Section du logiciel DOS «MonsterBook» Inventaire de la bibliothèque de Gladir.com Entrée administrateur

Il peut être très agaçant de ne pas connaitre les détails du système d'exploitation en cours, pour y parvenir le Perl fournit de nombreuses possibilités. Plutôt que de tenter de deviner la valeur d'une variable bien précis comme :

  1. #!/usr/bin/perl
  2.  
  3. print $ENV{"PROMPT"};

On peut par exemple visualiser l'ensemble des variables du système d'exploitation. A l'aide du code source Perl suivant, vous trouverez la réponse que vous souhaitez :

  1. #!/usr/bin/perl
  2.  
  3. print "Voici le contenu des variables d'environnement du système d'exploitation:\n";
  4.  
  5. foreach $key (sort keys(%ENV)) {
  6.    print "$key = $ENV{$key}\n";
  7. }

on obtiendra par exemple le résultat suivant avec «Windows XP Professionnel» :

Voici le contenu des variables d'environnement du système d'exploitation:
ALLUSERSPROFILE = C:\Documents and Settings\All Users
APPDATA = C:\Documents and Settings\gladir\Application Data
CLASSPATH = .;C:\Program Files\Java\jre1.6.0_07\lib\ext\QTJava.zip
COMMONPROGRAMFILES = C:\Program Files\Common Files
COMPUTERNAME = VIN
COMSPEC = C:\WINDOWS\system32\cmd.exe
CONTENT_LENGTH =
CUDA_BIN_PATH = C:\CUDA\bin
CUDA_INC_PATH = C:\CUDA\include
CUDA_LIB_PATH = C:\CUDA\lib
DOCUMENT_ROOT = C:\Program Files\Perl Express\Debug\
FP_NO_HOST_CHECK = NO
GATEWAY_INTERFACE = CGI/Emulation
HOMEDRIVE = C:
HOMEPATH = \Documents and Settings\gladir
HTTP_REFERER = http://www.perl-express.com/
HTTP_USER_AGENT = Mozilla/4.0
LOGONSERVER = \\VIN
NUMBER_OF_PROCESSORS = 1
ORACLE_HOME = C:\DevSuiteHome_1
OS = Windows_NT
PATH = C:\Program Files\Windows Resource Kits\Tools\;C:\Program Files\ActiveState Komodo IDE 4\;C:\Perl\bin;C:\cygwin\bin;C:\DevSuiteHome_1\jdk\jre\bin\classic;C:\DevSuiteHome_1\jdk\jre\bin;C:\DevSuiteHome_1\jdk\jre\bin\client;C:\DevSuiteHome_1\jlib;C:\DevSuiteHome_1\bin;C:\DevSuiteHome_1\jre\1.4.2\bin\client;C:\DevSuiteHome_1\jre\1.4.2\bin;C:\Program Files\PHP\;C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\PROGRA~1\ULTRAE~1;C:\Program Files\Borland\StarTeam SDK 9.3\Lib;C:\Program Files\Borland\StarTeam SDK 9.3\Bin;C:\Program Files\MySQL\MySQL Server 5.0\bin;c:\Program Files\Microsoft SQL Server\90\Tools\binn\;C:\CUDA\bin;C:\Program Files\QuickTime\QTSystem\;C:\Program Files\Druide\Antidote
PATHEXT = .COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH
PHPRC = C:\Program Files\PHP\
PROCESSOR_ARCHITECTURE = x86
PROCESSOR_IDENTIFIER = x86 Family 6 Model 8 Stepping 1, AuthenticAMD
PROCESSOR_LEVEL = 6
PROCESSOR_REVISION = 0801
PROGRAMFILES = C:\Program Files
QTJAVA = C:\Program Files\Java\jre1.6.0_07\lib\ext\QTJava.zip
QUERY_STRING =
REMOTE_ADDR = 127.0.0.1
REMOTE_HOST = localhost
REQUEST_METHOD = GET
SCRIPT_NAME = Out11.txt
SERVER_NAME = localhost
SERVER_PORT = 80
SERVER_PROTOCOL = HTTP/1.1
SERVER_SOFTWARE = Perl Express/2.5
SESSIONNAME = Console
SYSTEMDRIVE = C:
SYSTEMROOT = C:\WINDOWS
TEMP = C:\DOCUME~1\gladir\LOCALS~1\Temp
TMP = C:\DOCUME~1\gladir\LOCALS~1\Temp
ULTRAMON_LANGDIR = C:\Program Files\UltraMon\Resources\en
USERDOMAIN = VIN
USERNAME = gladir
USERPROFILE = C:\Documents and Settings\gladir
VS80COMNTOOLS = C:\Program Files\Microsoft Visual Studio 8\Common7\Tools\
WINDIR = C:\WINDOWS
WORKSTATIONID = C:\Program Files\StarTeam 4.0\ConnectionManager.ini

N.B.: Naturellement, le résultat varie en fonction de la machine, du système d'exploitation, des applications, de l'utilisateur et de l'environnement réseau.

Dernière mise à jour: Mardi, le 3 janvier 2012