MGW_NOM=$(egrep "^[A-Z]{2,}" memorialgenweb_140eRI.txt | sed "s/\([A-Z]*\) .*/\1/")
MGW_PRENOM=$(egrep "^[A-Z]{2,}" memorialgenweb_140eRI.txt | sed "s/[A-Z]* //")
GED_NOM=$(egrep "/[A-Z]{2,}/" mplf.ged | sed "s/1 NAME \/\([A-Z]*\)\/.*/\1/")
GED_PRENOM=$(egrep "/[A-Z]{2,}/" mplf.ged | sed "s/1 NAME \/.*\/ \(.*\)/\1/")


IFS='
';
i=0;
for l in $(cat mplf.ged.sav);
do
	if test $(echo $l | grep -c "@I...") -eq "1";
	then
		((++i));
		printf "\n0 @I%03d@ INDI\n" $i;
	else
		echo $l;
	fi;
done