• # shell

    Posté par (site web personnel, Mastodon) . En réponse au message Besoin d'aide pour mon premier script en perl: parser un fichier BIND. Évalué à 3. Dernière modification le 08 juillet 2015 à 13:44.

    Salut, je connais pas perl mais en shell je ferais un truc comme ça :

    #!/bin/sh
csv="/tmp/csvfile"
zone="/var/xxx"
for line in `cat $csv`
do
 recordname=`echo $line | cut -d';' -f1`
 type=`echo $line | cut -d';' -f2`
 ip=`echo $line | cut -d';' -f3`
 sed "s/$recordname/;$recordname/" -i $zone
 echo $recordname '\t' $type $ip >> $zone
done

    (fait en live, pas réfléchi, pas testé. Faudrait au moins limiter le sed pour pas pas qu'il rajoute des ; sur les lignes déjà commentées)