Sujet Précédent Sujet Suivant

[Perl] trouver la ieme lettre d'un mot ?

_vince Messages postés 37 Statut Membre -  
lami20j Messages postés 21644 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   -
Bonjour,

je voudrais savoir comment isoler la 5eme lettre d'un mot de 12 ?
$mot = ABGSISMCDEFG

Merci d'avance pour vos reponses.

2 réponses

Réponse 1 / 2
lami20j Messages postés 21644 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
Salut,

voici 3 possibilités 
root@debian:~# perl -e '$mot = "ABGSISMCDEFG";($cinq) = $mot=~/^.{4}(.)/;print $cinq,"\n"'
I
root@debian:~# perl -e '$mot = "ABGSISMCDEFG";$cinq = substr($mot,4,1);print $cinq,"\n"'
I
root@debian:~# perl -e '$mot = "ABGSISMCDEFG";$cinq = unpack("x4 A1",$mot);print $cinq,"\n"'
I
root@debian:~#
0
Réponse 2 / 2
BLood
 
Bonjour, avec un logiciel comme mathematica, ca peut se faire facilement si tu l'as sous la main...
-1

Discussions similaires

question pix mot caché
aorum10 -
astrid-g85 -

6 réponses
Table des matières dont les titres n'apparaissent pas..
Synua -
ggg -

10 réponses
Mot de passe administrateur Freebox : où le trouver ?
Utilisateur anonyme -
Marie -

7 réponses