my $sth = $dbh->prepare("SELECT location, title FROM things");
  $sth->execute();
  while (my $row = $sth->fetch) {print "@$row\n"; }