Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    use Wx;
    ...
    my($app) = WxPerlComExample->new();
    
    $app->MainLoop();
    
  2. or download this
    use strict;
    use warnings;
    use Wx;
    ...
    # will not return until the last frame is closed
    
    $app->MainLoop();
    
  3. or download this
    my $frame = MyAppFrame->new(undef, -1, 'A wxPerl Application');
       # my $frame = wxPerl::Frame->new(undef, 'A wxPerl Application');