sub new {
    my ($class) = @_;
    
    my $self = {
        foo     => 'bar',
        bar     => 'maz',
        options => {
            anoption      => 1,
            anotheroption => 'foo',
            option3       => 'barbar',
        },
    };
    
    return bless $self, $class;
}