use warnings; use strict; use Tk; use POE qw (Loop::TkActiveState); use POE::Loop::TkActiveState; use POE::Kernel; use POE::Session; use POE::Resource::Aliases; use POE::Resource::Events; use POE::Resource::Extrefs; use POE::Resource::FileHandles; use POE::Resource::Sessions; use POE::Resource::SIDs; use POE::Resource::Signals; use POE::Resource::Statistics; if(! defined($poe_main_window)) { die "\$poe_main_window not defined" };