• Publicidad

Acme::Pony: Cómo se descodifica

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

Acme::Pony: Cómo se descodifica

Notapor audax » 2014-02-18 08:46 @407

Saludos a la comunidad.

Mi consulta: no sé si se habrá respondido en otro lugar, pero busqué y no encontré algo claro. El tema es bien simple:

¿Cómo descodifico un script previamente aplicada la codificación Acme::Pony?

Gracias a todos.
audax
Perlero nuevo
Perlero nuevo
 
Mensajes: 56
Registrado: 2013-06-03 13:16 @594

Publicidad

Re: Acme::Pony: Cómo se descodifica

Notapor audax » 2014-03-05 07:54 @371

¿¿Nadie sabe si se puede o no??
audax
Perlero nuevo
Perlero nuevo
 
Mensajes: 56
Registrado: 2013-06-03 13:16 @594

Re: Acme::Pony: Cómo se descodifica

Notapor explorer » 2014-03-05 10:06 @462

Pues claro que se puede... el código de descodificar está en el propio módulo Acme::Pony:
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1.         $code=unpony($code); # $code=~s/\n__END__//;
  2.         eval($code);
  3.         exit();
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4

Entonces, lo que debes hacer es editar Pony.pm, y en la línea del eval(), la cambias por un print (por ejemplo), para que saque el código en pantalla.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Re: Acme::Pony: Cómo se descodifica

Notapor audax » 2014-03-06 08:11 @383

Gracias, explorer siempre tan amable...

Me funcionó de las mil maravillas, había visto algo así, pero no entendía nada lo que había que hacer, ahora veo la luz. Muchas gracias nuevamente.


Saludos.
audax
Perlero nuevo
Perlero nuevo
 
Mensajes: 56
Registrado: 2013-06-03 13:16 @594


Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 4 invitados