Recherche:

merci

system( q/awk 'BEGIN {FS=";"} {print $1 FS $3 FS $4}' < fichier-orig.csv > fichier-dest.csv/ );


merci, mais peut etre je suis pas allé au bout de ma question,

j'aimerais bien savoir comment...

system( q/awk 'BEGIN {FS=";"} {print $1 FS $3 FS $4}' < fichier-orig.csv > fichier-dest.csv/ );


c'est cette solution qui m'interesse mais perl prend $1 $3 $4 comme variable ainsi le ";" comme...

Bonjour,

ma question est simple .

Comment représenter cette commande dans une variable perl.



awk 'BEGIN {FS=";"} {print $1 FS $3 FS $4}' < fichier-orig.csv > fichier-dest.csv