PERL : Analyse d'entiers dans une chaine

nick111, le lundi 17 septembre 2007 à 14:14:35

Bonjour,

Je desire extraire des entiers d une chaine de caracteres, ceci en PERL :
$chaine_0 = 192.168.123.123

Le resutat :
$entier_1=192
$entier_2=168
$entier_3=123
$entier_4=123

J ai bien trouve des trucs du type %d, dans les chapitres sur les expressions regulieres mais je ne vois pas comment le mettre en oeuvre.

Merci

Configuration: Windows XP
Internet Explorer 6.0

Répondre à nick111 Signaler ce message aux modérateurs Aller au dernier message

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

lami20j, le lundi 17 septembre 2007 à 15:16:24

Salut,

#!/usr/bin/perl
#
$chaine_0 = '192.168.123.123';
grep{print"\$chaine_${\(++$i)}=$_\n"}split/\./,$chaine_0;
__END__

--
lami20j

Répondre à lami20j

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

lami20j, le lundi 17 septembre 2007 à 15:39:46

encore une possibilité

#!/usr/bin/perl
my $chaine_0 = '192.168.123.123';
print"\$chaine_${\(++$i)}=$_\n"for($chaine_0=~/(\d\d\d)/g);
__END__

--
lami20j

Répondre à lami20j

Posez votre question Répondre

Toutes les réponses pour « PERL : Analyse d'entiers dans une chaine »