Discussion :

[olivier62voile]

Bonjour

je débute en perl et j'ai besoin de lister les routes persistantes de différentes machines windows

j'ai localisé celles ci en base de registre via l'expression : REG QUERY "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\Tcpip\Parameters\PersistentRoutes"

HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\Tcpip\Parameters\PersistentRoutes
0.0.0.0,0.0.0.0,123.1.1.230,-1 REG_SZ
123.8.51.180,255.255.255.255,123.1.1.230,1 REG_SZ

par contre je ne parviens pas à récupérer les valeurs via la commande

my @table = split(/\n/, 'REG QUERY "HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Services\\Tcpip\\Parameters\\PersistentRoutes"' );

au final je souhaiterai récupérerune chaine de caractéres : quelque chose comme cela
0.0.0.0 0.0.0.0 ==> 123.1.1.230
123.8.51.180 255.255.255.255 ==> 123.1.1.230

Quelqu'un pourrait il m'aider ?
merci d'avance
bonne journée

[Philou67430]

Pour accéder au registre Windows, tu dois utiliser un module perl. Lequel souhaite-tu utiliser ? (ici, tu mets en paramètre de split, une chaine de caractère ne correspondant pas au contenu de la clé que tu recherches, c'est donc normal que cela ne retourne pas ce que tu souhaites).