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
Partager