[Perl] Comment retourner une chaine de caractaires ?

Comment retourner une chaine de caractaires ? [Perl] - Perl - Programmation

Marsh Posté le 06-10-2004 à 22:04:29    

Lu,
 
comment est-ce que je peux retrouner une chaine de caracteres (contenant juste des lettres) ?
ex.: "AOND...IDYF" -> "FYDI...DNOA"


---------------
"Deux chose sont infinies, l'univers et la sotise humaine. Mais je ne suis pas sûr de ce j'affirme quant à l'univers." Albert Einstein
Reply

Marsh Posté le 06-10-2004 à 22:04:29   

Reply

Marsh Posté le 06-10-2004 à 22:09:04    

j'ai trouvé : reverse()


---------------
"Deux chose sont infinies, l'univers et la sotise humaine. Mais je ne suis pas sûr de ce j'affirme quant à l'univers." Albert Einstein
Reply

Marsh Posté le 07-10-2004 à 11:07:41    

reverse ne marche que sur les listes...
 
mais tu peux transformer ta chaine en liste, la retourner, et la retransformer en chaine:
 

Code :
  1. my $str = "test";
  2. $str = join('', reverse split('', $str));
  3. print $str;

Reply

Marsh Posté le 07-10-2004 à 11:10:28    

Reply

Marsh Posté le 07-10-2004 à 11:11:41    

pospos a écrit :

reverse ne marche que sur les listes...


 
Meuh non !!! http://iis1.cps.unizar.es/Oreilly/ [...] h01_07.htm

Reply

Marsh Posté le 07-10-2004 à 18:38:35    

au temps pour moi
en contexte scalaire reverse concatene les elements de la liste (1 seul element si c'est un string) et renvoi un scalair qui est le renversement de cette concatenation, effectivement...
 
c'est fonction du contexte:
 
print reverse('123')
=>123
 
print scalar(reverse('123'))
=>321
 
$a = reverse('123'); print $a;
=>321
 
@a = reverse('123'); print @a;
=>123
 
print induit un contexte de liste
ca m'apprendra a tester des choses avec un print...


Message édité par pospos le 07-10-2004 à 18:39:37
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed