my $mw = MainWindow->new; my $newWindow = $mw->TopLevel();