[Perl] trouver la ieme lettre d'un mot ?
Fermé
_vince
Messages postés
37
Date d'inscription
mardi 30 janvier 2007
Statut
Membre
Dernière intervention
14 mai 2008
-
21 janv. 2008 à 15:56
lami20j Messages postés 21331 Date d'inscription jeudi 4 novembre 2004 Statut Modérateur, Contributeur sécurité Dernière intervention 30 octobre 2019 - 21 janv. 2008 à 16:41
lami20j Messages postés 21331 Date d'inscription jeudi 4 novembre 2004 Statut Modérateur, Contributeur sécurité Dernière intervention 30 octobre 2019 - 21 janv. 2008 à 16:41
Bonjour,
je voudrais savoir comment isoler la 5eme lettre d'un mot de 12 ?
$mot = ABGSISMCDEFG
Merci d'avance pour vos reponses.
je voudrais savoir comment isoler la 5eme lettre d'un mot de 12 ?
$mot = ABGSISMCDEFG
Merci d'avance pour vos reponses.
A voir également:
- [Perl] trouver la ieme lettre d'un mot ?
- Comment trouver le mot de passe wifi sur son téléphone - Guide
- Trouver adresse mac - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Trousseau mot de passe iphone - Guide
- Changer la lettre d'un disque dur - Guide
2 réponses
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 569
21 janv. 2008 à 16:41
21 janv. 2008 à 16:41
Salut,
voici 3 possibilités
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:~#