Как я могу переместить PerlTk Widget на MacOS?

Если я напишу на Mac программу perlTk "hello world":

use Tk;
# Main Window
my $mw = new MainWindow;
my $label = $mw -> Label(-text=>"Hello World") -> pack();
my $button = $mw -> Button(-text => "Quit", 
        -command => sub { exit })
    -> pack();
MainLoop;

Оно работает. Но я не могу переместить виджет perlTk на рабочий стол. Это исправлено в программе X11. Как я могу это исправить на MacOS? Конфигурация X11? Плохая версия perlTk?

На Tkx все работает нормально:

use Tkx;
Tkx::grid( Tkx::ttk__button(".b", -text => "Hello, world" ) );
Tkx::MainLoop();

0 ответов

Другие вопросы по тегам