justanotherperlhacker (Allgemeines zu Perl)

[thread]6536[/thread]

justanotherperlhacker

Crian

2004-08-27 13:39

User since
2003-08-04
5871 Artikel
ModeratorIn

Wieso gibt der folgende Code das aus, was er ausgibt?

Code: (dl )

perl -e "($_='kkvvttuubbooppuuiiffssqqffssmmiibbddllffss')=~y~b-v~a-z~s; print"

ach wegen dem s ... ^^

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

Alexfo85

2004-08-27 22:55

User since
2004-08-18
20 Artikel
BenutzerIn
[default_avatar]

naja transliteration in einer andern form halt ;)

Strat

2004-08-28 22:46

User since
2003-08-04
5246 Artikel
ModeratorIn

Code: (dl )

perl -MO=Deparse -e "....."

ist da ein echter Spassverderber...

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/

Crian

2004-08-30 11:24

User since
2003-08-04
5871 Artikel
ModeratorIn

Ich hatte mich nur erst gewundert, weil der STring viel länger ist. Nach Nachlesen was die option s bei tr macht war es dann aber klar =)

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

View all threads created 2004-08-27 13:39.