sub new {
    my $class = shift;
    my $self = {
        _description => shift,
        _priority => shift,
        _type  => shift,
        _tasks => []
    };
    bless $self, $class;
    return $self;
}