Perl

[RegExp] exclure des sous chaines

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [RegExp] exclure des sous chaines

zerod

atchoum !

Bonjour à tous, avant de ne plus avoir un cheveux sur la tête je poste mon soucis ^^

j'essayer de valider ce genre de condition :
" $chaine ne commence pas par // contient } et ne se termine pas par */"

ca me donne un truc dans le genre :

Code :

if ( $chaine =~ /^[^\/\/]*}[^\*\/]*$/ ) {

evidement ca ne fonctionne pas car mes conditions entre crochet ne matchent pas des chaines mais des suites de caractères... oui mais voila la question justement

donc si je teste sur ces exemples :

Code :

} */
} //
// }
sfs }
} tralala;

seuls les 3 derniers sont bien identifiés, le 2 devrait l'être aussi (enfin avec la bonne expression bien sur )

help !

Publicité

pospos

le mieux c'est souvent de faire plusieurs regexp dans ce cas. c'est plus simple et pas forcement beaucoup plus lent

Code :

if (
$chaine !~ m!^//! # $chaine ne commence pas par //
&&
$chaine =~ m!\}! # contient }
&&
$chaine !~ m!/$! # ne se termine pas par /
) {

mais sinon tu peux faire une belle grosse regexp si tu trouve ca plus clair (et que ca vaud le coup niveau vitesse)

Code :

if ($chaine !~ !^//|^[^\}]*$|/!) {

vrai sauf si la chaine commence par //, ou ne contient que des caracteres autre que } ou est vide, ou fini par /

Message édité par pospos le 30-01-2006 à 17:54:03

zerod

atchoum !

Citation :

Code :

1.
if (
2.
$chaine !~ m!^//! # $chaine ne commence pas par //
3.
&&
4.
$chaine =~ m!\}! # contient }
5.
&&
6.
$chaine !~ m!/$! # ne se termine pas par /
7.
) {

j'y avais pensé à ca sauf que c'est pas bon car je ne cherche pas à savoir si la chaine se termine par */ mais seulement s'il n'y aurait pas un */ aprés un } (resp. un /* avant un {).

là je n'ai pas ce genre de notion tu vois c'est ca que je ne parviens pas à formaliser :'(

en gros je compte les accolades ouvrantes et fermantes pour parser du c++ (je fais de l'ajout automatique de code à certains endroits précis) et je suis actuellement embêté par ce genre de cas :

} //commentaire
-> je zappe l'accolade à cause du /

n'est-il pas possible de formaliser "une chaine qui n'est pas */ répétée n fois ou 0" de la même facon que l'on peut écrire : [^a]* pour matcher une chaine ne contenant pas de a ?

pospos

deja c'est koi le * ?
tu cherche un * literal ?

si tu veux matcher des truc balancés genre parentheses alors je te conseil Text::Balanced

tu veux faire koi en fait?

zerod

atchoum !

je compte les accolades ouvrantes et fermantes dans du code c++ afin de me situer dans ce code (premiere accolade de méthode, derniere etc etc).

aussi je cherche à vérifier ce genre de truc :

Code :

bla bla bla }

-> accolade--

Code :

} //commentaire

-> accolade--

Code :

bla bla bla } /* commentaire

-> accolade--

mais pas ce genre de cas :

Code :

// comment }

-> pas accolade--

Code :

} */

-> pas accolade--

tu vois ce que je veux dire ?

zerod

atchoum !

Je pense avoir trouvé, en fait ta solution était quasiement la bonne, il fallait juste ajouter les notions d'ordre

il doit y avoir plus simple et plus robuste surtout (je vais louper les "} /* blabla */ mais c'est pas grave) :

Code :

if ( $chaine !~ /^.*\/\/.*\}.*$/
&& $chaine =~ /^.*\}.*$/
&& $chaine !~ /^.*\}.*\*\/$/

Merci beaucoup pour ton aide pospos

FORUM HardWare.fr

Programmation

Perl

[RegExp] exclure des sous chaines

Sujets relatifs
Concatener des chaines de caracteres	[SQL] comment insérer des chaines avec des ' (apostrophes)?
[RegEx] Aide pour regexp (commence par ... et ne finit pas par ...)	probleme requete REGEXP
PHP-SQL Problème avec REGEXP	[ MySQL] chaines de caractères : LEFT() / RIGHT()
verification remplissage formulaire via regexp	les chaines de caracteres
plusieurs remplacements de chaînes de caractères ds un fic en une seul	chaines de caractères en PHP demande d'aide
Plus de sujets relatifs à : [RegExp] exclure des sous chaines

Page générée en 0.039 secondes