Perlmonk code

Obfuscation Code

Rising Force

@'={$}=>,{}=>0x70,*,,0x6A,$={$$}=>0x68,*,,0x61,};
$,.= chr$_ foreach keys%{@'};
$_=$,,s<^(.)(.)(...).*>@$3$2$1@.print;

Información relacionada

Life Cicle | Sub CallerThread {} | Rising Force | Obfu or another method? | Call .. Call ... Call .. | Live and Die | ('Japh'^'Chars'^'Concept') | It depends on chance | Simply JAPH | Polymorphism JAPH | Brothers Vars | (Recursive || Not) Japh Spidering | Learning Perl Vars | MySelf Japh Socket | Just Another Perl hacker | Japh Random Search | JAPH Math | Recursive Obfuscation