Leser: 27
1
2
3
4
5
6
7
8
9
#!/usr/bin/perl
use strict;
use warnings;
use TK;
my $main = MainWindow->new(-title=>'Ich bin ein Programm');
# irgendwelche Widgets
MainLoop;
1
2
3
Execution of F:\...\anyfile.pl aborted due to compilation errors.
# oder
Undefined subroutine &main::MainLoop called at F:\...\anyfile.pl line 9999.
Tk::MainLoop;
2009-04-09T08:47:45 pqwie schon gesagt wurde, das modul heisst Tk und nicht TK und deshalb sollte man, auch wenn andere workarounds "funktionieren", use Tk; schreiben. wenn in der doku irgendwo TK steht, ist das ein fehler, und wenn in der doku Tk steht, sollte man das auch so benutzen, statt es grosszuschreiben.
use Tk;
Tk::MainLoop;