jahwik has asked for the wisdom of the Perl Monks concerning the following question:

Hi all, I read the other comments & earlier threads about this but I'm not sure I understand.

I need to correct a Perl application (made with perl2exe) which is not running well.
The only thing I got is some old code-files which are not up to date, and the executables of the running program.
If i can get the code from the executable then I could alter the program but otherwise I've to create and built extra code in the out-of-date version to achieve same functionality as the executable.
The original programmer left in a hurry without leaving the actual code-version behind.

I am not a perl-programmer so this not my area!! I don't have much time so if I can't retrieve the code I'll have to start with the older versions.

Hopefully someone can help me out,

thanx, Jah

Replies are listed 'Best First'.
Re: decompile perl2exe
by cchampion (Curate) on Feb 06, 2005 at 19:39 UTC
[reply]
      Tnx, I've read them but don't think i could create such a xor(-1) script.At least not in a short time....

      Anybody know if there is such a script available somewhere?
[reply]
Re: decompile perl2exe
by tachyon (Chancellor) on Feb 07, 2005 at 05:29 UTC

    Try this (assuming *nix as OS): 

    $ mv /usr/bin/perl /usr/bin/perl.real
$ cat > /usr/bin/perl
#!/bin/sh 
PROG=$1
/usr/bin/perl.real -MO=Deparse $PROG
^D
$ chmod 755 /usr/bin/perl

    [download]

    $ is prompt. Ctrl+D to finish entering your perl substitute shell script.

    Try running your exe and it should/may (untested) spew source. 

    $ some.exe > source.txt 2>&1

    [download]
    Reverse changes with: 
    $ rm -f /usr/bin/perl
$ mv /usr/bin/perl.real /usr/bin/perl

    [download]

    All care, no responsibility.

    cheers

    tachyon

[reply]
[d/l]
[select]
      Thank you.

      Any chance you can give the translation to windows in this.

      Got no xp with unix/linux.......

      Jahwik
[reply]

Back to Seekers of Perl Wisdom