Discussion :

[vidici]

bonjour
j'ai un fichier svg ou je voudrais rendre le dernier point invisible en changeant la classe css

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
<!-- datapoint shown -->
        <circle cx="369.95" cy="400" r="2.5" class="dataPoint2"/>
 
                              <!-- datapoint shown -->
        <circle cx="370.9" cy="400" r="2.5" class="dataPoint2"/>
 
                              <!-- datapoint shown -->
        <circle cx="371.85" cy="400" r="2.5" class="dataPoint2"/>
 
                              <!-- datapoint shown -->
        <circle cx="372.8" cy="400" r="2.5" class="dataPoint2"/>
# et apres autre chose

il faut donc que je trouve le dernier class="dataPoint2" et le remplace par class="invisible". Il faut savoir que toute les retours lignes sont supprimés au moment du traitement.
Si vous avez ça, dans vos cartons.

[-Eks-]

Salut vidici,

Si tes retours à la ligne sont supprimés, ou si tu utilises le modificateur //s pour traiter l'information comme si elle était sur une seule ligne, il te suffit de matcher class="dataPoint2" précédé du quantificateur .*, qui va opérer de façon "gourmande", pour atterrir sur le dernier.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
#!/usr/bin/perl
 
use strict;
use warnings;
 
my $st = q(<!-- datapoint shown -->
        <circle cx="369.95" cy="400" r="2.5" class="dataPoint2"/>
 
                              <!-- datapoint shown -->
        <circle cx="370.9" cy="400" r="2.5" class="dataPoint2"/>
 
                              <!-- datapoint shown -->
        <circle cx="371.85" cy="400" r="2.5" class="dataPoint2"/>                                                                                                                                                  
 
                              <!-- datapoint shown -->
        <circle cx="372.8" cy="400" r="2.5" class="dataPoint2"/>
# et apres autre chose);
 
 
if ($st =~ /^(.*class=")(dataPoint2)(".*$)/s) {
    print "$1invisible$3";
} else {
    print 'Erreur : les données ne contiennent ' .
    'aucun class="dataPoint2"\n';
}

Eks

[vidici]

merci Eks
en fait j'avais pas vu que tu m'avais donné une solution toute faite dans le bas du déroulant. Mais j'ai suivis la piste de ton intro et j'en suis arrivé à cela

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 my ($captureE)= $gif =~ /(.+)*r="2.5" class="dataPoint1"/;
        my ($captureF)= $gif =~ /.*r="2.5" class="dataPoint1"(.+)/;
        $gif = $captureE.'r="0" class="dataPoint1"'.$captureF;

je voulais te remercier pour ça quand j'ai vu ta solution... scrogneu gneu j'aurais gagné du temps.

[Lolo78]

scrogneu gneu j'aurais gagné du temps.

Bah, tu as sans doute appris quelque chose en le faisant toi-même.

[vidici]

Bah, tu as sans doute appris quelque chose en le faisant toi-même.

certes ... par contre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

my ($captureE)= $gif =~ /(.+)*r="2.5" class="dataPoint1"/;

bien que ne faisant pas échouer le programme, et bien que fournissant le resultat attendu, me donne cette erreur
Complex regular subexpression recursion limit (32766) exceeded at CreateLineGraph.pm
Je viens de m'en rendre compte.

[Lolo78]

C'est un warning, pas une erreur. Tu peux sans doute le réduire au silence avec le pragma suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
use warnings;
no warnings qw/regexp/;

mais je n'ai pas essayé.

Cela dit, ce warning indique que peut-être ton expression utilise le moteur d'expression régulière de façon un peu inefficace, ou du moins suboptimale (sur une chaîne trop longue). Si c'est juste un fois, ça n'a sans doute pas trop d'importance, mais si tu le fais de très nombreuses fois dans ton programme, il faut peut-être envisager une solution différente: soit un mini-parser, soit une utilisation des fonctions rindex et substr, soit une expression régulière un peu plus subtile empêchant de trop nombreux retours arrière (backtracking) du moteur de regex.