Les mauvaises géométries dans un WKT

Pour trouver les lignes ou polygones constitués d'un seul point :

LINESTRING( |)\(( |)\d*\.\d* \d*\.\d*( |)\)

MULTILINESTRING( |)\(( |)\d*\.\d* \d*\.\d*( |)\)

POLYGON( |)\(\(( |)\d*\.\d* \d*\.\d*( |)\)\)

MULTIPOLYGON( |)\(\(( |)\d*\.\d* \d*\.\d*( |)\)\)

Et pour remplacer les fausses lignes par exemple, par des points :

Remplacer LINESTRING(?=( |)\(( |)\d*\.\d* \d*\.\d*( |)\)) par POINT.