Foro - Perl en Español

Estaba leyendo esta página: http://www.flu-project.com/ocultando-un ... asero.html , y me gustó la idea. Tengo todo pensado pero lo que me falta es saber cómo hacer que el programa exe final pueda mostrar los archivos sin que estos existan. A lo que me refiero es que esos archivos estén dentro del programa exe, lo que aparentemente es lo que hacen todos los stubbs

¿ Alguien se le ocurre algo ?

Tengo el siguiente código :



Lo que necesito es cargar ese programa llamado test.exe de forma oculta, o sea, que no se vea porque test.exe es una ventana como un programa normal pero para unas pruebas necesito cargar ese programa desde perl de forma oculta. Como ven el código no hace lo que quiero pero es la única forma que conozco.

¿ Alguien conoce alguna forma ?

No uso Windows, pero creo que el problema es que estás ejecutando el test.exe bajo el cmd, que es el que realmente crea la ventana. Deberías ejecutar el test.exe sin el cmd, directamente. Con la opción no_window ya estás indicando que no quieres crear una ventana, sino solo ejecutar el proceso.

Tengo pensado usar un código binario en un hash pero no sé cómo ponerlo en una variable porque aunque use ", ', o q(), no cierra nunca.

¿ Alguien me podría decir cómo se llama y cómo lo puedo poner en una variable sin problemas ?

Debes hacer un programa auxiliar, que lea el archivo binario y lo transforme a código Perl, en el que todos los bytes sean convertidos a otra notación, por ejemplo, la hexadecimal.

Quedaría algo así:


Luego, solo queda copiar y pegar en tu propio código.

Hummm, lo veo difícil. La única solución que conseguí era usarlo en un archivo de texto pero queda muy mal.

¿ No hay otra forma ?

Tengo el siguiente código en Python :



Necesito hacer un script en Perl que me ayude a decodificar hex como lo hace el script en Python en la parte "decode('hex')".

¿ Alguien sabe cómo lograr el mismo resultado ?

Doddy escribiste:Hummm, lo veo difícil. La única solución que conseguí era usarlo en un archivo de texto pero queda muy mal.

¿ No hay otra forma ?

Pero... ¡¡¡si es hacer un programa de cuatro líneas!!!

Soy de mente lenta. No capto fácilmente la onda

No entiendo. ¿ Cómo serían esas cuatro líneas con ese largo código binario ?

Doddy escribiste:Necesito hacer un script en Perl que me ayude a decodificar hex como lo hace el script en Python en la parte "decode('hex')".

¿ Alguien sabe cómo lograr el mismo resultado ?

Estas son dos maneras de hacerlo:

(La parte del hexdump es solo para comprobar que lo hace bien).
(Obviamente, el pack() es mucho más óptimo que el bucle while).
(Ejemplos sacados de perldoc perlpacktut, y en la Web).