my $app = Wx::SimpleApp->new; my $frame_1 = MyFrame1->new(); $app->SetTopWindow($frame_1); $frame_1->Show(1); $app->MainLoop();