sub Wx::Sizer::AddMany { my $sizer = shift; $sizer->Add($_) for @_; }
sub Wx::Sizer::AddMany { my ( $self, @many ) = @_; $self->Add($_) for @many; }

sub Wx::Sizer::AddMany {
    my ( $self, $flags, @many ) = @_;
    if ( 'ARRAY' eq ref $flags ) { $self->Add( $_, @$flags ) for @many; }
    else                         { $self->Add($_) for $flags, @many; }
}