Perl-數據庫連接計數/錯誤處理

Question

使用Perl腳本（Perl 5.8.6），我正在連接到Sybase數據服務器。

尋找以下內容：

1. 腳本當前打開了多少個連接。

2. 通用（非數據服務器專用）錯誤處理模塊/機制

執行存儲的proc時，它返回以下錯誤消息。

DBD :: Sybase :: st執行失敗：服務器消息號= 27000嚴重性= 16狀態= 1行= 4服務器= SYBDEV_HYD過程= j_err文本=但是此命令在/ usr上[對於語句“ EXEC sandbox..j_err”]起作用/local/lib/perl5/site_perl/5.8.6/DBIx/ContextualFetch.pm第51行。

由於此腳本的用戶不是技術人員，因此請嘗試僅報告消息“但是此消息確實如此”（出現在text =之后）。 盡管我可以解析它，但是嘗試查看是否有任何通用模塊，因為其他數據服務器（如MySQL，SQL Server等）可以有自己的報告錯誤msg的方式。

Answer 1

我不太確定您要問的是什么，但是通過閱讀DBD :: Sybase和DBI的文檔，您會發現很多信息。 您可能必須自己跟蹤連接數（請參閱DBI-> connect的示例）。

對於錯誤處理，您可能應該自己編寫一個合理的診斷消息以及行號-您可以使用warn（）或carp（）輕松地做到這一點。

也請隨時編輯您的問題，並提供有關您要做什么的更多詳細信息； 一些示例代碼會有所幫助。