Perlでシーザー暗号

CTFやってるとシーザー暗号の問題があってネットからPerlコードをひらってきて使ったんだけど、 うまくいかなくて。書いた。

うまくいってるか微妙

ってか、Perlってこんなに楽しいんだ。

叫んでた(爆笑。

範囲の中をforで回せないかってやってなんとかできた。(できてるか知らない)

記号がうまくいかないけど、気にすんな。

あと、$shift消そう