[perl] inserer un caractere dans chaine

Résolu
tisba972 -  
fiddy Messages postés 11069 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

je souhaiterai modifier une variable chaine de caractere qui donne l'heure.
elle est pour l'instant de la forme :

$heure = "1356Z"

et je souhaite obtenir : $heure = "13h56"

en ce qui concerne la suppression du "Z" final un chomp fera l'affaire mais comment insérer le "h" au milieu ?

merci
A voir également:

4 réponses

Réponse 1 / 4
tisba972
 
vous aurez remarqué ma faute de frappe il s'agit bien sur d'un chop et non d'un chomp
;-)
0
Réponse 2 / 4
fiddy Messages postés 11069 Date d'inscription   Statut Contributeur Dernière intervention   1 846
 
Salut,
Essaie : 
#!/bin/perl
$_="1356Z";
s/(\d{2})(\d{2})Z/$1h$2/;
print;

Cdt
0
Réponse 3 / 4
tisba972
 
Merci c'est nickel
:-)
0
Réponse 4 / 4
fiddy Messages postés 11069 Date d'inscription   Statut Contributeur Dernière intervention   1 846
 
Mais de rien ;)
0