Select Code to Download

package Widget;
use strict;
...
    my $self = {};
    bless( $self, $class );
}

{
    package Widget::Special;
...
}

my $special = Widget::Special->new;