Datem-extention

[Patrick Andrieu]

Nachhakemuss...

my $str = 'Fischers Fritze fischte frische Fische';

print join ' ', (split / /, $str)[3,4,2,0,1];

> > Soviel aus der Abteilung "What Perl can do for You" ;)  
> Fein! print gefolgt von einer Funktion war mir nicht bekannt...  
  
... und deswegen habe ich gleich rumexperimentiert:  
  
@thread\_beteiligten = qw!Edi Struppi Patrick Siechfred!;  
#^Chronologische Auftrittsreihenfolge  
print reverse @thread\_beteiligten;  
#^Ausgabe = SiechfredPatrickStruppiEdi  
print sort @thread\_beteiligten;  
#^Ausgabe = EdiPatrickSiechfredStruppi  
  
Soweit so gut. Aber warum ergibt:  
  
$name = "Patrick";  
print reverse $name;  
  
immer noch Patrick, während:  
  
$eman = reverse $name;  
print $eman;  
  
wie gewünscht ckirtaP ergibt?  
  
Viele Grüße aus Frankfurt/Main,  
Patrick

-- 
![](http://www.atomic-eggs.com/clubsig.gif)  
  
\_ - jenseits vom delirium - \_  
  
[[link:hatehtehpehdoppelpunktslashslashwehwehwehpunktatomicminuseggspunktcomslash](http://www.atomic-eggs.com/)]  
Nichts ist unmöglich? [Doch!](http://www.atomic-eggs.com/cwi/cwi_4.shtml)  
Heute schon ge[gök](http://goek.atomic-eggs.com/goek_goek.html)t?