{ chaine=$0 for (i = 1 ; t==0; i++) if (substr(c,i,1)=="") t=i-1 pt=-1 for (i = 1 ; i<=length ; i++) for (j=1 ; substr(chaine,i+j-1,1)==substr(c,j,1) && (j<=t+1);j++) if (j==t) {li++ ; pt =i-1} av=substr(chaine,1,pt) ap=substr(chaine,pt+t+1,length) l++ if (pt>-1) print "mv -i " chaine "  " av r ap } END{ print "# chercher:" c " remplacer:" r " nbli:" l " nb subst=" li }