Perl

[Résolu][Perl] Chaine entre 2 délimiteurs

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [Résolu][Perl] Chaine entre 2 délimiteurs

Profil supprimé

(Re)-Bonjour,

Je risque de passer souvent ici en ce moment
Encore et toujours débutant en Perl (ou assimilé [:tinostar] ), j'aurai une pitite question sur un découpage de chaine de caractères.

Je récupère une chaine de caractères du genre :

[blabla][blublu]djshfsldhfeuhff

Avec des informations entre les "[...]" qui se baladent dans la chaine (pas forcément au début ou à la fin).
Je tente de récupérer les infos entre les crochets soit "blabla" et "blublu" dans mon exemple (le reste je m'en fous totalement ) et je sais pas trop comment faire

Quelqu'un a une idée ? voire mieux ... une solution ?

Merci bien.

Message édité par Profil supprimé le 21-07-2009 à 09:43:17

Publicité

gilou

Modérateur
Modosaurus Rex

Deux hints: expression reguliere non-greedy pour capturer ce qui est entre [ et ], et \G
A+,

---------------
There's more than what can be linked! -- Le capitaine qui ne veut pas obéir à la carte finira par obéir aux récifs. -- No jab ? No job ! -- (╯°□°)╯︵ ┻━┻

Elmoricq

Modérateur

Troisième hint : documentation complète sur le site officiel
Et plus précisément ici pour les regexps : http://perldoc.perl.org/perlre.html

Profil supprimé

Merci à vous deux.

J'ai trouvé ca comme solution :

Code :

$mavar = "[ABC-123] ezhfe [BAC-321][ACB-213] sdfhe[CAB-312]";
# On récupère des chaines de type [ABC-123]
while ($mavar =~ /(\[\w+-\d+\])/go)
{
my $var = $1;
# Suppression du caractère "[" du début
$var =~ s/^\[//;
# Suppression du caractère "]" de fin
$var =~ s/\]$//;
}

Ça me récupère bien ABC-123, BAC-321, ACB-213 et CAB-312, par contre est ce le plus "optimisé" ... (et le moins tordu :pt1cable: ) ... pas sur

gilou

Modérateur
Modosaurus Rex

Ca serait plus simple de faire:
while ($mavar =~ /\[(\w+-\d+)\]/go)
{
my $var = $1;
}

A+,

---------------
There's more than what can be linked! -- Le capitaine qui ne veut pas obéir à la carte finira par obéir aux récifs. -- No jab ? No job ! -- (╯°□°)╯︵ ┻━┻

Profil supprimé

Ah vi ... pas con
Bon bah Merci

FORUM HardWare.fr

Programmation

Perl

[Résolu][Perl] Chaine entre 2 délimiteurs

Sujets relatifs
[Résolu][Expression Régulière] Besoin d'aide	[Résolu] Prob d'url rewriting avec OVH (.htaccess)
[LaTeX][resolu] package listings et utilisation de emphstyle	[Résolu] Problème lors du tri d'un vecteur d'itérateurs
[Résolu][Perl][PostgreSQL] Problème d'installation DBI	[VBA Excel 2007] erreur Nombre d'arguments incorrects [RESOLU]
[XML/php/Mysql] Caractere chinois	Recherche chaine de caractères
Plus de sujets relatifs à : [Résolu][Perl] Chaine entre 2 délimiteurs

Page générée en 0.048 secondes