sub select_db{
  my ($self,$sel) = @_;
  return $self->{_dbh}->selectall_arrayref($sel);
}