Perl: существует ли функция DBI, похожая на Statistics_info, для получения ссылок и ограничений FK?

При выполнении \d+ для таблицы в Postgres он перечисляет схему таблицы вместе с индексами, а также другие таблицы, которые ссылаются на нее как на FK. Пример:

    Table "public.foo_table"
   Column   | Type |   Modifiers   | Storage  | Description 
------------+------+---------------+----------+-------------
 id         | text |               | extended | 
 foo        | text |               | extended | 
 bar        | text |               | extended | 
Indexes:
    "foo_table_id_idx" btree (id)
    "foo_table_foobar_idx" btree (foo,bar)
Foreign-key constraints:
    "foo_table_bar_fk" FOREIGN KEY (bar) REFERENCES public.bar_table(id)
Referenced by:
    TABLE "public.bar_table" CONSTRAINT "bar_table_foo_fk" FOREIGN KEY (foo) REFERENCES public.foo_table(foo)
Has OIDs: no

Вы можете сделать что-то $dbh->statistics_info(...), чтобы получить информацию об индексе. Есть ли что-то подобное для получения информации FK (ссылки и ссылки)?

Похоже, мой следующий вариант — либо выполнить команду ->do(), либо запросить системные таблицы.


postgresql foreign-keys dbi perl dbd-pg
person vol7ron    schedule 16.04.2012    source источник
comment
нашел foreign_key_info, я проверю, как он используется, так как он принимает 6 аргументов (нечетные)   -  person vol7ron    schedule 16.04.2012
comment
Значок самообучения для @vol7ron :)   -  person Ωmega    schedule 16.04.2012
comment
@stackoverflow: мне бы очень хотелось, чтобы вы не удаляли свой ответ, я действительно думаю, что он был полезен.   -  person vol7ron    schedule 16.04.2012

Ответы (2)


arrow_upward
1
arrow_downward

Что я нашел до сих пор:

$dbh->foreign_key_info( pk_cat, pk_schema, pk_tbl
                      , fk_cat, fk_schema, fk_tbl      );

# FK References
$dbh->foreign_key_info( undef , undef    , undef   
                      , undef , undef    , $table_name );

# FK Referenced By
$dbh->foreign_key_info( undef , undef    , $table_name 
                      , undef , undef    , undef       );

## Putting the schema/catalog info only ensures you are hitting the intended 
##    table. If you have dupicate tables, or your table is not in the public 
##    schema it's probably a good idea to include the schema.
## Catalog is generally unnecessary for Postgres
person vol7ron    schedule 16.04.2012

arrow_upward
0
arrow_downward

Если вы запустите psql с параметром -E, он покажет все запросы, которые он запускает для ответа на \d (и другие) запросы метаданных. Это довольно легко скопировать/вставить, чтобы получить нужные запросы.

person kgrittn    schedule 16.04.2012
comment
Это может быть хорошей альтернативой. У меня уже есть запросы на получение информации, хотя я искал что-то более чистое. - person vol7ron; 16.04.2012