Re: perl, Tk GUI, problem with getOpenFile, in a packed program

Replies are listed 'Best First'.
Re^2: perl, Tk GUI, problem with getOpenFile, in a packed program by gbertrand (Initiate) on Jul 22, 2009 at 16:05 UTC
Dear Christoph, your simple example (pp -o test.bin -e 'use Tk; use Tk::Bitmap; tkinit->getOpenFile') works fine. An important additional information: during the "compilation" process with pp, my program is run twice (I don't know why, I have not fully understood the compilation options yet). The first run corresponds to the .par file, I think. During this run, the file selection window lists all the files. However, during the second run (the .bin) the window does not list any file. Here is the compilation option I use to produce the .bin: pp -o FLT.bin -a my_module.pm -C -x -vvv my_prog.pl Best regards, Gilles	[reply]
Re^3: perl, Tk GUI, problem with getOpenFile, in a packed program by lamprecht (Friar) on Jul 23, 2009 at 13:00 UTC
Hi, Given the program `use warnings; use strict; use Tk; use Tk::Bitmap; my $mw = MainWindow->new(); $mw->getOpenFile(); MainLoop;` [download] packing with `pp -o test.exe -C -x -vvv test.pl` I can't reproduce this. I see the program running once during packing as documented when using the -x switch. Note however, that -x does not make so much sense in a Tk program, where lots of modules are loaded on demand. The static dependency checks of Module::ScanDeps work quite well given that you explicitly use/require the needed modules or instantiate them like so:`$mw->MyWidget()`. Also if you write `require my_module;` in my_program.pl you do not need to add my_module.pm using the -a switch. I would recommend, that you try to strip down your program to get to the point where the packing works. Maybe this will help to track down the problem. Cheers Christoph	[reply] [d/l] [select]