my $mw = MainWindow->new();
$mw->geometry("+100+100");
$mw->title("Main Window");

$mw->overrideredirect(1);

$mw->bind("<Return>", \&do_dialog);