sub new {
    my ($class) = @_;
    return bless {}, $class
}