sub finish {
  my $self = shift;
  $self->{'dbh'}->disconnect;
}