sub teardown { my $self = shift; $self->param('mydbh')->disconnect; }