Font
Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl
[thread]6317[/thread]

String überarbeiten (page 2)

Reader: 1


<< |< 1 2 >| >> 11 entries, 2 pages
Crian
 2004-06-07 19:31
#83116 #83116
User since
2003-08-04
5873 articles
ModeratorIn
[Homepage]
user image
Hätte mich auch überrascht, wenn RE wirklich schneller gewesen wäre. Und in der 4, -2 Schreibweise sieht man doch auch, was Sache ist :)
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
<< |< 1 2 >| >> 11 entries, 2 pages



View all threads created 2004-06-07 17:42.