sub done { my $self = shift; return !($self->foo or $self->bar); }