RosettaCodeData/Task/Window-creation/Perl/window-creation-7.pl
2015-02-20 00:35:01 -05:00

5 lines
108 B
Perl

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