Bonjour à tous,
Je suis tout nouveau en perl et je viens du monde ms.
Ne connaissant que vbs et powershell il faudra être patient avec moi.
Bon voilà mon besoins:
Je dois faire des modifications massive d'enregistrements DNS dans 15 zones Bind9.7.
En entrée j'ai un fichier csv qui se compose ainsi.
RecordName,Type,NewIP
SERVER1,A,YYYY
server2,A,YYYY
L'idée algorithmique serait la suivante:
#------debut script ------------------
$csvfile = readcsv(/tmp/csv)
$zonefile = open (/var/cache/bind/mydomain.com)
foreach ($row in
(…)