item1
item2
<%filter> my($table) = '/home/httpd/tables/test.dbedit'; my($dir) = '/home/joe'; use strict; use lib "/home/httpd/lib"; use DBedit; my ($dbedit) = DBedit->new ({ "scan_table", $table, "scan_page_length", 0, # length of page 0 if no paging "scan_marker", "(edit)", "append_marker", "Append record"}); $dbedit->table($table); $dbedit->keycols(["item1"]); $dbedit->form($_); $_ = $dbedit->process(\%ARGS);