PERL extraction de valeur

Fermé
baboun - 23 nov. 2007 à 16:02
lami20j Messages postés 21331 Date d'inscription jeudi 4 novembre 2004 Statut Modérateur, Contributeur sécurité Dernière intervention 30 octobre 2019 - 23 nov. 2007 à 16:44
Bonjour,

Je doit ecrire un script en PERL (5.8.0) sous unix afin d'extraire ques infos sur les serveurs. Dans mon programme je doit récuperer une variable qui est sous la forme :

usage...............123456789

Je voudrais récuperer uniquement le nombres à la fin.

Quelqu'un connait il une fonction qui me permettrait de récuperer cette valeur en perl ?

Merci

1 réponse

lami20j Messages postés 21331 Date d'inscription jeudi 4 novembre 2004 Statut Modérateur, Contributeur sécurité Dernière intervention 30 octobre 2019 3 567
23 nov. 2007 à 16:44
Salut,

voici un exemple
#!/usr/bin/perl
use strict;use warnings;

my $var='usage...............123456789';
(my $res=$var)=~s/.*\D(\d+)$/$1/;

print "$res\n";
0