Can't locate loadable object for module Tk::Event in @INC (@INC contains: PERL
XE_STORAGE D:\PERL\Konvertierung C:\DOKUME~1\YAPD\LOKALE~1\Temp/p2xtmp-688) at
RL2EXE_STORAGE/Tk.pm line 13.
Compilation failed in require at PERL2EXE_STORAGE/Tk.pm line 13.
BEGIN failed--compilation aborted at PERL2EXE_STORAGE/Tk.pm line 13.
Compilation failed in require at D:\PERL\Konvertierung\tk.exe line 5.
BEGIN failed--compilation aborted at D:\PERL\Konvertierung\tk.exe line 5.

# Sample tk program for Perl2Exe

#perl2exe_exclude "Encode/ConfigLocal.pm"

use Tk;
use Tk::Label;
use Tk::DummyEncode;

#perl2exe_include utf8;
#perl2exe_include "unicore/lib/Perl/Word.pl";
#perl2exe_include "unicore/To/Digit.pl";
#perl2exe_include "unicore/lib/Perl/SpacePer.pl";
#perl2exe_include "unicore/To/Lower.pl";
#perl2exe_include "unicore/Heavy.pl";

#perl2exe_include "Tk.pm";

my $main = new MainWindow;
$main->Label(-text => 'Tk sample')->pack();

my $name_w = $main->Entry(-width => 20)->pack(-padx => 30);

$main->Button(-text => 'Ok', -command => sub{do_ok($name_w)} )
->pack(-side => 'left', -padx => 30);

$main->Button(-text => 'Close', -command => sub{do_close()} )
->pack(-side => 'right', -padx => 30);


MainLoop;

sub do_ok {
    my ($name_w) = @_;
    my $name_val = $name_w->get;
    print "You entered $name_val\n";
}

sub do_close {
    exit;
}