Das bleibt trotzdem irgendwie merkwürdig.
Aber änder mal Dein Notebook in ein NoteBook wie ptk schon bemerkte, Renee's Code baute ja nur auf Deinem von weiter oben auf, nehme ich an.
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