Contenu | Rechercher | Menus

Annonce

Si vous rencontrez des soucis à rester connecté sur le forum (ou si vous avez perdu votre mot de passe) déconnectez-vous et reconnectez-vous depuis cette page, en cochant la case "Me connecter automatiquement lors de mes prochaines visites". Attention, le forum rencontre actuellement quelques difficultés. En cas d'erreur 502, il ne faut pas re-valider l'envoi d'un message ou l'ouverture d'une discussion, au risque de créer un doublon.

La section divers se réorganise ! De nouvelles sous-sections à venir. (plus d'infos + donner son avis)

#1 Le 29/10/2012, à 11:35

inserm

[Résolu] parser une valeur

Bonjour,

voilà le script

#!/usr/bin/perl

my $value='220150250';

$value=~ m/(\d{8})\d{6}/;
   print "$value\n";

Je veux afficher les trois premier chiffre à gauche : 22.0

Merci.

Dernière modification par inserm (Le 29/10/2012, à 14:29)

Hors ligne

#2 Le 29/10/2012, à 14:28

inserm

Re : [Résolu] parser une valeur

Merci
J'ai trouvé en rajoutant deux lignes:

   

$value = substr($value,0,3);
			$value =~ s/^(\d+)(\d)$/$1.$2/;
			print "$value\n";

Hors ligne

Haut de page ↑