perl - Perl：如何验证对“XML::eXistDB::RPC”的成功调用

Question

我正在使用 eXist 数据库编写一个小型 perl 应用程序，我想知道的是：我如何才能看到我的调用

my $eXist = XML::eXistDB::RPC->new( destination=>$eXist_db, repository=>$bank, user=>"admin", password=>"pass" ) ;

成功与否？

谢谢

Answer 1

根据文档：

所有方法都返回一个 LIST，其中第一个标量是返回码 (RC)。当该代码为 0 时，一切顺利。否则，代码表示服务器逻辑报告的传输错误或异常（拒绝）。无论哪种情况，返回列表中的第二个标量都包含错误消息。例如，

也许这也适用于构造函数，试试：

my ($rc,$eXist) = XML::eXistDB::RPC->new( destination=>$eXist_db, repository=>$bank, user=>"admin", password=>"pass" );

现在，如果 $rc != 0 出现错误。

Answer 2

当对象初始化失败时，它将通过Log::Report发送消息，因此请加入其中。

仅当程序员忽略设置rpc或destination参数时才会发生这种情况。构造new函数将始终返回一个对象实例。