#!/usr/bin/perl

use Wx;
use Wx::Demo;

my $app = Wx::SimpleApp->new;
my $frame = Wx::Demo->new;

$frame->Show;
$app->MainLoop;