After adding the lines Mark Swyne used the scandeps looks like this;

c:\rt>scandeps.bat -B rt-1.pl
'ActiveState::Path'          => '0.02',
'FileHandle'                 => '2.01',
'B'                          => '1.09_01',
'Carp::Heavy'                => '1.04',
'Thread'                     => '2.00',
'ActivePerl'                 => 'undef',
'Text::ParseWords'           => '3.24',
'Fcntl'                      => '1.05',
'AutoLoader'                 => '5.63',
'ActivePerl::Config'         => 'undef',
'Win32'                      => '0.28',
'overload'                   => '1.04',
'B::Deparse'                 => '0.71',
'Scalar::Util'               => '1.18',
'Encode::Alias'              => '2.06',
'Encode::Config'             => '2.03',
'utf8'                       => '1.06',
'PerlIO::encoding'           => '0.09',
'XSLoader'                   => '0.06',
'Encode::Encoding'           => '2.04',
'Encode'                     => '2.18',
'Exporter::Heavy'            => '5.58',
'IO::Socket::INET'           => '1.29',
'File::Spec::Unix'           => '1.2',
'Class::Struct'              => '0.63',
'File::stat'                 => '1.00',
'IO'                         => '1.22',
'IO::Dir'                    => '1.05',
'IO::Pipe'                   => '1.13',
'SelectSaver'                => '1.01',
'IO::File'                   => '1.13_01',
'IO::Seekable'               => '1.10',
'IO::Select'                 => '1.17',
'Socket'                     => '1.78',
'Locale::Constants'          => '2.07',
'bytes'                      => '1.02',
'Errno'                      => '1.09_01',
'POE::Filter'                => '1.1955',
'File::Glob'                 => '1.05',
'Compress::Zlib'             => '1.42',
'POE::Queue::Array'          => '1.1979',
'POE::Resources'             => '1.2106',
'File::Spec'                 => '0.82',
'UNIVERSAL'                  => '1.01',
'File::Spec::Win32'          => '1.2',
'POE::Loop::PerlSignals'     => '1.1980',
'POE::Pipe'                  => '1.2116',
'IO::Socket::UNIX'           => '1.22',
'IO::Socket'                 => '1.29',
'Symbol'                     => '1.06',
'Sys::Hostname'              => '1.11',
'POE::API::ResLoader'        => '1.1903',
'IO::Handle'                 => '1.25',
'Win32::Console'             => '0.07',
'Win32API::File'             => '0.10',
'POSIX'                      => '1.09',
'List::Util'                 => '1.18',
'Festival::Client::Async'    => '0.0303',
'Win32::SAPI4'               => '0.08',
'Win32::SAPI5'               => '0.05',
'Locale::Country'            => '2.07',
'Locale::Language'           => '2.07',
'Win32::Locale'              => '0.04',
'Win32::OLE'                 => '0.1707',
'strict'                     => '1.03',
'warnings'                   => '1.05',
'constant'                   => '1.05',
'threads::shared'            => '1.01',
'Carp'                       => '1.04',
'vars'                       => '1.01',
'Exporter'                   => '5.58',
'DynaLoader'                 => '1.05',
'Tk::ColorEditor'            => '4.008',
'Tk::DirTree'                => '4.014',
'Tk::Event'                  => '4.015',
'Tk::FBox'                   => '4.018',
'Tk::Widget'                 => '4.030',
'Tk::Config'                 => '804.027',
'Cwd'                        => '3.12',
'Tk::Dialog'                 => '4.004',
'Tk::Submethods'             => '4.004',
'Tk::Image'                  => '4.011',
'Tk::MainWindow'             => '4.012',
'Tk::Canvas'                 => '4.012',
'Tk::Optionmenu'             => '4.013',
'Tk::Scale'                  => '4.004',
'subs'                       => '1.00',
'Tk::DialogBox'              => '4.013',
'DirHandle'                  => '1.00',
'Tk::Tree'                   => '4.005',
'Tk::Derived'                => '4.010',
'Tk::Event::IO'              => '4.008',
'Tk::IconList'               => '4.007',
'Tk::LabEntry'               => '4.006',
'File::Basename'             => '2.74',
're'                         => '0.05',
'Tk::Toplevel'               => '4.006',
'Tk::Wm'                     => '4.014',
'Tk::Listbox'                => '4.014',
'Tk::widgets'                => '4.004',
'Tk::Frame'                  => '4.010',
'Tk::Configure'              => '4.008',
'Tk::Clipboard'              => '4.008',
'Tk::CmdLine'                => '4.006',
'Tk::Menu::Item'             => '4.004',
'Tk::HList'                  => '4.014',
'Tk::Adjuster'               => '4.007',
'Tk::After'                  => '4.007',
'Tk::Checkbutton'            => '4.006',
'Tk::Pretty'                 => '4.006',
'Tk::Pixmap'                 => '4.004',
'Tk::Entry'                  => '4.017',
'Tk::Menubutton'             => '4.004',
'Tk::Menu'                   => '4.021',
'Win32::API::Struct'         => '0.40',
'Win32::API::Type'           => '0.40',
'Win32::API'                 => '0.41',
'Win32::TieRegistry'         => '0.26',
'Win32API::Registry'         => '0.24',
'Win32::OLE::Lite'           => 'undef',
'Win32::OLE::Enum'           => 'undef',
'Win32::OLE::Variant'        => 'undef',
'Win32::API::Prototype'      => '20021217',
'Win32::WinError'            => '0.02',
'Tie::Hash'                  => '1.02',
'Tie::Handle'                => '4.1',
'integer'                    => '1.00',
'Math::BigInt::Trace'        => '0.01',
'Math::BigInt::CalcEmu'      => '0.05',
'Math::BigInt'               => '1.77',
'Math::BigInt::FastCalc'     => '0.10',
'Math::BigInt::Calc'         => '0.47',
'YAML::Dumper::Base'         => 'undef',
'YAML::Error'                => 'undef',
'YAML::Loader::Base'         => 'undef',
'base'                       => '2.07',
'YAML::Base'                 => 'undef',
'YAML::Node'                 => 'undef',
'YAML::Types'                => 'undef',
'YAML::Tag'                  => 'undef',
'Data::Dumper'               => '2.121_08',
'sort'                       => '1.02',
'Tk::Scrollbar'              => '4.010',
'Tie::Scalar'                => '1.00',
'Tk::DummyEncode'            => '4.007',
'warnings::register'         => '1.01',
'Term::Cap'                  => '1.09',
'Config::Simple'             => '4.58',
'POE::Filter::Reference'     => '1.2025',
'POE::Loop::Select'          => '1.1980',
'POE::Resource::Controls'    => '1.2087',
'POE::Session'               => '1.2116',
'POE::Wheel::FollowTail'     => '1.2111',
'POE::Wheel::Run'            => '1.2106',
'Speech::Synthesis'          => '0.03',
'Win32::Sound'               => '0.47',
'Win32::SoundRec'            => '0.02',
'Storable'                   => '2.15',
'POE::Resource::Events'      => '1.2087',
'Time::HiRes'                => '1.86',
'POE::Resource::Statistics'  => '1.2087',
'POE::Resource::Aliases'     => '1.2087',
'POE::Resource::Extrefs'     => '1.2087',
'POE::Resource::FileHandles' => '1.2087',
'POE::Resource::SIDs'        => '1.2087',
'POE::Resource::Sessions'    => '1.2087',
'POE::Resource::Signals'     => '1.2087',
'POE::Kernel'                => '1.2116',
'POE::Pipe::OneWay'          => '1.2116',
'POE::Pipe::TwoWay'          => '1.2116',
'POE::Driver::SysRW'         => '1.2106',
'POE::Filter::Line'          => '1.1920',
'POE::Wheel'                 => '1.1903',
'POE'                        => '0.37',
'Config'                     => 'undef',
'Tk::Label'                  => '4.006',
'Tk::Button'                 => '4.008',
'YAML::Loader'               => 'undef',
'YAML::Dumper'               => 'undef',
'YAML'                       => '0.62',
'Encode::Unicode'            => '2.03',
'Tk'                         => '804.027',
'Tk::FileSelect'             => '4.015',


Now, when I use the "-Bx" argument, the script runs and I hear the audio prompts, but nothing appears on the screen.

c:\rt>scandeps.bat -Bx rt-1.pl
Terminating on signal SIGINT(2)
Terminating on signal SIGINT(2)
Terminate batch job (Y/N)? y

Mark Swayne wrote:
John,

I meant to send my initial reply to the PAR list. I'm getting with the program and sending this reply to the list.

Does the program crash or does POE::Kernel::run just return? Try adding some debugging print statements after the call to P::K::run.

You could also try turning on some of the debugging/tracing features of POE ( http://search.cpan.org/~rcaputo/POE/lib/POE/Kernel.pm#Kernel's_Debugging_Features ). They should show you what states you're entering, leaving and what is happening.

You could also try posting to the POE list. http://poe.perl.org/?POE_Support_Resources/POE's_mailing_list

Good luck.

--Mark Swayne

Jon Polacheck wrote:
Mark,

I added your lines to my source and commented the "use" lines that were duplicated. Now pp generates an exe file, but when I invoke that exe from the command line I get a few seconds of hour glass and the prompt returns. No sign of the Tk app. Any suggestions?

Thanks for your help,

Jon

Mark Swayne wrote:
Jon Polacheck wrote:
My script uses POE.  I got a working exe using pp once, but cannot
repeat the feat.  I now get the error as follows;

I use PerlApp with POE, and I need to include a sizable list of libraries to get things working because its dependency checker doesn't begin to catch all the modules to include. Probably something similar is happening here. Here's an example from one of my apps:


# Required by POE
require Storable;
require YAML;
require YAML::Dumper;

require POE::Filter::Line;
require POE::Pipe::OneWay;
require POE::Pipe::TwoWay;
require POE::Driver::SysRW;
require POE::Filter::Reference;

require POE::Resource::Aliases;
require POE::Resource::Controls;
require POE::Resource::Events;
require POE::Resource::Extrefs;
require POE::Resource::FileHandles;
require POE::Resource::SIDs;
require POE::Resource::Sessions;
require POE::Resource::Signals;
require POE::Resource::Statistics;

require POE::Wheel;
require POE::Wheel::Run;
require POE::Wheel::FollowTail;
require POE::Loop::Select;

require POE::Kernel;
require POE::Session;

--Mark Swayne












Reply via email to