B :: Deobfuscate. B :: Deobfuscate Perl Módulo contém o código-fonte deobfuscate.
Baixe Agora

B :: Deobfuscate. Classificação e resumo

B :: Deobfuscate. Tag

Módulo Perl. fonte Código fonte Código de Deobfuscate. Deobfuscate.

B :: Deobfuscate. Descrição

B :: Deobfuscate Perl Módulo contém o código-fonte deobfuscate. B :: Deobfuscate Perl Módulo contém o código fonte de Deobfuscate.Synopsis Perl -mo = Deobfuscate, -csynthetic.yml, -Y sintetic.plb :: Deobfuscate é um módulo de backend para o compilador Perl que gera o código-fonte perl, com base no estrutura compilada que o próprio Perl cria depois de analisar um programa. Adiciona funções de renomeação do símbolo ao módulo B :: Doarse. Um programa ofuscado já é analisado e interpretado corretamente pelo programa B :: Doarse. Infelizmente, se a ofuscação envolveu a variável renomear, o programa resultante também tem símbolos ofuscados.Este módulo leva o último passo e corrige nomes como $ Z5223ED336 para ser uma palavra de um dicionário. Enquanto o nome ainda não é significativo, é pelo menos mais fácil distinguir e ler. Aqui estão dois exemplos - um de B :: Doarse e um a partir de B :: Deobfuscate.Irbfuscate.Ir Entrada se (@ z6a703c020a) {($ Z5A5FA8125D, $ ZCC158AD3E0) = Arquivo :: Tempfile ('Unlink', 1 )); print ($ z5a5fa8125d "= over 8NN"); (print ($ z5a5fa8125d @ z6a703c020a) or die (((( "não é possível imprimir $ zcc158ad3e0: $"))); print ($ z5a5fa8125d "= backn "); (fechar (* $ z5a5fa8125d) ou morrer ((((((((((" não pode fechar ". * $ za5fa8125d.": $! "))); (@ z8374cc586e = $ zcc158ad3e0); ($ Z9E5935EEA4 = 1) } Após B :: Deparse: if (@ z6a703c020a) {(MY Z5A5FA8125D, $ ZCC158AD3E0) = arquivo :: Tempfile ('Unlink', 1)); Imprimir ($ Z5A5FA8125D "= mais de 8nn") (Imprimir ($ Z5A5FA8125D @ Z6A703C020A) ou morrer ((((((q . $ zcc158ad3e0). ':'). $! $!))); Imprimir ($ Z5A5FA8125D "= Backn"); (Fechar (* $ z5A5FA8125D) ou morrer (((((q . * $ ZA5FA8125D). ':'. $! $!))); (@ z8374cc586e = $ zcc158ad3e0); ($ z9e5935ea4 = 1);} Após b :: Deobfuscate: if (@parentheses) {(my ($ Scrupululity, $ PostProcesser) = Arquivo :: Temp :: Tempfile ('Unlink', 1)); Imprimir ($ Scrupulosa "= mais de 8nn"); ( Imprimir ($ Scrupulousity @pare nhesises) ou morrem ((((((q . $ postprocesser). ':'). $!))); Imprimir ($ Scrupulousity "= Backn"); (fechar (* $ scrupululity) ou morrer (((((q . * $ postprocesser). ':'). $!)))); (@Interruptível = $ pós-processador); ($ propagandaist = 1); } Você notará que a única diferença real é que, em vez de nomes de variáveis, como $ Z9E5935EEAE, você recebe $ propagandista. Requisitos: · Perl.

B :: Deobfuscate. Software Relacionado