求助！编写GUI的问题!

beyond1121

#!/usr/bin/perl

use strict;
use warnings;

use TK;

sub byebye()
{
  exit (0);
}

my $tk_mw=MainWindow->new();
my $tk_button=$tk_mw->Button(
    -text => "Hello World",
    -command => &byebye
);

$tk_button->pack(
    -side=>'top'
);

MainLoop();        
      
为什么运行后没输出？
Subroutine Tk::MainWindow::Synchronize redefined at C:/Perl/site/lib/Tk.pm line 84.
出现这提示怎么办？