RosettaCodeData/Task/Window-creation/Perl/window-creation-5.pl
2023-07-01 13:44:08 -04:00

5 lines
108 B
Perl

use Wx;
$window = Wx::Frame->new(undef, -1, 'title');
$window->Show;
Wx::SimpleApp->new->MainLoop;