Please enable JavaScript in your browser!
Главная
Обзор
Помощь
Регистрация
Вход
trizen
/
perl-scripts
Следить
1
В избранное
0
Ответвить
0
Файлы
Обсуждения
0
Запросы на слияние
0
Вики
Дерево:
f20327c080
Ветки
Метки
master
23.09
22.07
perl-scripts
/
JAPH
/
length_obfuscation.pl
length_obfuscation.pl
94 B
История
Исходник
1
2
3
$_=q qrea ncJertsa ,thelhPkour q,my $i=length;
while($i){s/(.{$i})(.)/$2$1/g;--$i}print+$_.$/