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".

#1 Le 29/10/2012, à 12: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, à 15:29)

Hors ligne

#2 Le 29/10/2012, à 15: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 ↑