RosettaCodeData/Task/Window-creation/Perl/window-creation-5.pl
2019-09-12 10:33:56 -07:00

5 lines
108 B
Perl

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