$result = db::addrecord(tablename, $record_as_hashref); $id = db::added_record_id; @change = @{db::updaterecord(tablename, $record_as_hashref)}; %record = %{db::getrecord(tablename, 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);