Perl dbi 运行 psql 代码

Posted 2023-03-22

【中文标题】Perl dbi 运行 psql 代码

【英文标题】：Perl dbi running psql code

【发布时间】：2018-10-17 04:42:36

【问题描述】：

我想知道是否有人有使用 perl dbi 连接到 postgres 数据库的经验。所以我可以连接到我的 postgres 数据库并执行选择查询，但我不能执行 psql 查询。有谁知道是否可以在 perl dbi 中做到这一点？现在我使用这段代码来获取一个选择查询：

my $SQL = $dbh->prepare("select*from pg_settings;);
    $SQL -> execute();
    while ( my ($settings_fetch) = $SQL->fetchrow_array() )
    
        return $settings_fetch;
    

使用模块 PG:DBI

但是当我尝试将 \x 或 \pset 格式包装在准备语句中时，它不起作用。它没有给出任何错误，但输出不会换行，我仍然得到相同的输出。现在我有点困惑，如果是因为它不执行 psql 命令并包装获取的行，或者选择总是以相同的方式运行并且包装只是显示在显示器上并且不能用 dbi 获取

我想要这个的原因是因为我在一个数组中获取选择数组并将其输出到 word，但是当我得到包含很多列的大选择输出时，它确实在 word 表中变得混乱，所以我想要 @987654324 @我的word文档中的变体，这样我就不会水平而是垂直地得到10列。

【问题讨论】：

Perl 代码无法编译。请张贴你真正拥有的东西。

【参考方案1】：

\x 和\pset 是psql 客户端使用的格式化命令。 Postgres 服务器不使用它们。

如果你想格式化从你的 Perl 程序输出的数据，你必须在 Perl 中进行格式化。

例如，而不是写作：

foreach my $column (@$settings_fetch) 
    print $column;

你可以：

foreach my $column (@$settings_fetch) 
    print $column . "\n";

【讨论】：

哦，谢谢，我是 postgres 的新手，不清楚。谢谢你的澄清！！

@achahbar 如果您认为此答案有助于解决您的问题，请随时通过选择问题左侧的灰色勾号将其标记为正确答案。