Select Code to Download

$result  = db::addrecord(tablename, $record_as_hashref);
$id      = db::added_record_id;
...
@record  = db::getrecord(tablename); # Not for huge tables.
@record  = db::findrecord(tablename, fieldname, exact_value);
@record  = @{db::searchrecord(tablename, fieldname, value_substring)};

  my @clauses = map { "$_=?" } sort keys %r;
  my @values  = map { $r{$_} } sort keys %r;
  my $q = $db->prepare("INSERT INTO $table SET ". (join ", ", @clauses
+));
  my $result = $q->execute(@values);