I've been banging my head into this problem for about 6 hours, perhaps
someone could help.
I am trying to write an autoupdater, the problem is that pp build exe's
can't seem to exec another pp built exe. I've tried backticks, system,
everything I could think of -C -x -d on and on.
Here is a simple test. Let me know if anyone gets the same results.
E:\test>bar
BAR
Permission denied at -e line 640.
exit code= 13
E:\test>perl bar.pl
BAR
FOO
exit code= 0
_____________bar.pl___________________
#!/usr/bin/perl
use Win32::Process;
print "BAR\n";
Win32::Process::Create($ProcessObj,
"e:/test/foo.exe",
"foo",
0,
NORMAL_PRIORITY_CLASS,
".")|| die &Error;
$ProcessObj->Wait(INFINITE )|| die &Error;
$ProcessObj->GetExitCode($exitcode)|| die &Error;
print "exit code= $exitcode\n";
sub Error
{
print Win32::FormatMessage( Win32::GetLastError() );
}
____________foo.pl____________________
#!/usr/bin/perl -w
print "FOO\n";
____________build_____________________
pp -C -o bar.exe bar.pl
____________version___________________
E:\1LinkMedia>pp -V
Perl Packager, version 0.05 (PAR version 0.79)
Copyright 2002, 2003, 2004 by Autrijus Tang <[EMAIL PROTECTED]>
Neither this program nor the associated "parl" program impose any
licensing restrictions on files generated by their execution, in
accordance with the 8th article of the Artistic License:
"Aggregation of this Package with a commercial distribution is
always permitted provided that the use of this Package is embedded;
that is, when no overt attempt is made to make this Package's
interfaces visible to the end user of the commercial distribution.
Such use shall not be construed as a distribution of this Package."
Therefore, you are absolutely free to place any license on the resulting
executable, as long as the packed 3rd-party libraries are also available
under the Artistic License.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself. There is NO warranty; not even for
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
