sub my_query {
  my $my_dbh = shift;
  my $query = shift;

 ....
}

my_query($dbh1, "select * from potatoes");