voila le troisieme script A optimiser

le script

@ARGV=shift(@ARGV);
print " fichier << @ARGV >> :\n";
@fichier=<>;
.....