Opened by Crian at 2004-08-01 09:39
User since
2003-08-04
5866 Artikel
ModeratorIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
5866 Artikel
ModeratorIn
So, die Lösungen gibt es unter http://wiki.perl-community.de/bin/view/Wissensbasis/RaetseL20040801 (bis auf die zweite Löung von Kabel, die ich eben erst vorgefunden habe und deshalb erst heute Abend hochladen kann).
Ich habe dort im Wiki mal meine Lösung als Beispiellösung gezeigt, aufgrund der doch etwas vagen Aufgabenstellung (und sowieso) sollte sie aber nicht unbedingt als Maßstab angesehen werden.\n\n
<!--EDIT|Crian|1091780182-->
Ich habe dort im Wiki mal meine Lösung als Beispiellösung gezeigt, aufgrund der doch etwas vagen Aufgabenstellung (und sowieso) sollte sie aber nicht unbedingt als Maßstab angesehen werden.\n\n
<!--EDIT|Crian|1091780182-->
s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;
use strict; use warnings; Link zu meiner Perlseite
use strict; use warnings; Link zu meiner Perlseite