# -*- coding: utf-8 -*-

(
cat $DILIB_IMPORT/Wicri/Data/France/depRegFrance.wiki     \
      | MediaWikiCleanTable                         \
      | MediaWikiTable2SxmlRowCol                   \
      | MediaWikiTableTransformCol -t 1 -s "," -l 2345 -L 6  \
      | SgmlSelect -g r/c3/p/t# -p @g1 -g r/c2/p/k# -g r/c3/p/k# -g r/c4/p/k# -g r/c5/p/k#  \
       -p "<place><placeName><settlement type=\"city\">@g3</settlement><region type=\"region\">@g4</region><region type=\"old region\">@g5</region><region type=\"département\">@g2</region></placeName><country>France</country></place>" 

cat $DILIB_IMPORT/Wicri/Data/France/depRegFrance.wiki      \
     | MediaWikiCleanTable                           \
     | MediaWikiTable2SxmlRowCol                      \
     | MediaWikiTableTransformCol -t 1 -s "," -l 2345 -L 6  \
     | SgmlSelect -s r/c6/p -p @s1 -p @1            \
     | SgmlSelect -g p/t# -p @g1 -g r/c2/p/k# -g p/k# -g r/c4/p/k#  -g r/c5/p/k#   \
        -p "<place><placeName><settlement type=\"city\">@g3</settlement><region type=\"region\">@g4</region><region type=\"old region\">@g5</region><region type=\"département\">@g2</region></placeName></place>" 

cat $DILIB_IMPORT/Wicri/Data/France/BigCitiesFranceFr.wiki   \
    | MediaWikiCleanTable                            \
    |  MediaWikiTable2SxmlRowCol                    \
    |  MediaWikiTableTransformCol -l1 -T2 -E3      \
    |  TeiTableCityFromWiki 
) | sort