empdb.cfg

来自「perl learn perl by examples」· CFG 代码 · 共 13 行

%map_info = (
    "Employee" => {
                     "table"      => "emptable",
                     "attributes" => [qw(_id name age )],
                     "columns"    => [qw( id aname aage )]
                  },
    "Dept"     => {
                     "table"      => "depttable",
                     "attributes" => [qw(_id name)],
                     "columns"    => [qw(id  name)]
                  },
);