Sortie -cordial- NOM ADJ
#/usr/bin/perl # use locale; force le \w à prendre les accentués. open(FICCORDIAL, "$ARGV[0]"); open (OUT, ">sortiepatrons.txt"); #i=0;#new (facultative) car en perl on a pas besoin d'initialiser le compteur, car perl initialise par défaut à =0.**** #$compt=1;...