sub new {
    my $class = shift;
    my %args = @_;

    my $self = bless {}, $class;

    $self->{attrib1} = $args{attrib1} || 'Default 1';
    $self->{attrib2} = $args{attrib1} || 'Default 2';

    return $self;
}