Help for this page
#!/usr/bin/perl -w -- use strict; use warnings; ... # remove message from the queue return 1; }
#!/usr/bin/perl -w -- use Wx 0.15 qw[:allclasses]; ... $frame_1->Show(1); $app->MainLoop(); }