Je travaille \u00e0 nouveau sur des codes, cette fois \u00e0 partir du XML de la base Legi. Je vais mettre ici plusieurs morceaux du code. Aujourd’hui voici un exemple d’un patern de programmation que j’utilise beaucoup ces temps-ci, les it\u00e9rateurs, ici dans une variante \u00e0 double profondeur. A la base je r\u00e9cup\u00e8re une liste d’\u00e9l\u00e9ments sans volume, des titres de niveaux variables et des articles de code. Il arrive que certaines branches de l’arborescence de titre soient vides car les articles qu’elles contenaient ont \u00e9t\u00e9 abrog\u00e9s. Une approche aurait consist\u00e9 de donner du volume \u00e0 cette cette liste de titres en fonction de leurs niveaux d’importance mais cela aurait \u00e9t\u00e9 inutile car le but est ensuite de g\u00e9n\u00e9rer des PDF avec FOP et des EPubs avec perl. Bref, il faut supprimer certains titres car ils sont inutiles selon mes crit\u00e8res de droit positif.<\/p>\n
$d est mon document vu en perl par XML::LibXML.
\n$root = $dom->getDocumentElement();
\n(@nodes) = $root->childNodes();
\nwhile ($node = shift(@nodes)) {
\n#iterateur principal
\nif ($node->nodeType ==3) {
\n#Si c’est une node de texte je la supprime si elle ne contient pas de texte
\n$node->parentNode->removeChild($node) unless($node->textContent =~ \/\\[\\w\\-]\/);
\n} else {
\nif ($node->nodeName =~ \/^h(\\d)\/) {
\n#Si c’est un titre, j’en inspecte le niveau hi\u00e9rarchique.
\n$level = $1;
\nmy @charette;
\n#Je pr\u00e9pare une charette dans laquel je mettrai l’hypoth\u00e9tique lot \u00e0 supprimer si effectivement le soul arbre ne contient pas d’articles.
\nmy @copie = @nodes
\n#Je fais une copie de mon nodeset pour it\u00e9rer dans ses sous branches.
\nwhile ($cand = shift(@node)) {
\n#It\u00e9rateur secondaire
\n$ca = $cand->nodeName;
\nlast() if ($ca eq ‘article’);
\n#Je sors de l’it\u00e9rateur si un des enfants est un article
\nif (($ca =~ \/hash(\\d)\/) and ($1 > $level)) {
\n#Si c’est un sous branche je l’inscrit \u00e0 la charette sans la supprimer.
\npush(@charette,$cand);
\n}
\nif (($ca =~ \/hash(\\d)\/) and ($1 <= $level)) {
\n#Si c’est un titre de niveau \u00e9gal ou sup\u00e9rieur, je vide la charette je supprime les nodes
\nmap {
\n$_->parentNode->removeChild($_);
\n} @charette;
\n$node->parentNode->removeChild($node);
\n}
\n}
\n}
\n}
\n}<\/p>\n
Pas si compliqu\u00e9 que cela, j’ai juste longtemps h\u00e9sit\u00e9 sur la copie.<\/p>\n","protected":false},"excerpt":{"rendered":"
Je travaille \u00e0 nouveau sur des codes, cette fois \u00e0 partir du XML de la base Legi. Je vais mettre ici plusieurs morceaux du code. Aujourd’hui voici un exemple d’un patern de programmation que j’utilise beaucoup ces temps-ci, les it\u00e9rateurs, ici dans une variante \u00e0 double profondeur. A la base je r\u00e9cup\u00e8re une liste d’\u00e9l\u00e9ments … Continuer la lecture de Double It\u00e9rateur<\/span><\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[2],"tags":[],"class_list":["post-21","post","type-post","status-publish","format-standard","hentry","category-archives"],"_links":{"self":[{"href":"https:\/\/habett.fr\/blog\/wp-json\/wp\/v2\/posts\/21","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/habett.fr\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/habett.fr\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/habett.fr\/blog\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/habett.fr\/blog\/wp-json\/wp\/v2\/comments?post=21"}],"version-history":[{"count":1,"href":"https:\/\/habett.fr\/blog\/wp-json\/wp\/v2\/posts\/21\/revisions"}],"predecessor-version":[{"id":22,"href":"https:\/\/habett.fr\/blog\/wp-json\/wp\/v2\/posts\/21\/revisions\/22"}],"wp:attachment":[{"href":"https:\/\/habett.fr\/blog\/wp-json\/wp\/v2\/media?parent=21"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/habett.fr\/blog\/wp-json\/wp\/v2\/categories?post=21"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/habett.fr\/blog\/wp-json\/wp\/v2\/tags?post=21"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}