Select Code to Download

    my $panel = Wx::Panel->new($self, -1);
    my $sizer = Wx::BoxSizer->new(wxVERTICAL);
...
    $sizer->Add($control, 1, wxEXPAND);
    $panel->SetSizerAndFit($sizer);
    return $self;

    my $sizer = Wx::BoxSizer->new(wxVERTICAL);
    my $control = my_control->new($self);
    $sizer->Add($control, 1, wxEXPAND);
    $self->SetSizerAndFit($sizer);
    return $self;