Perl -Database-Connection Count / обработка ошибок - PullRequest
0 голосов
/ 31 октября 2009

Используя Perl-скрипт (Perl 5.8.6), я подключаюсь к серверу данных Sybase.

Глядя на следующее:

  1. Сколько соединений в данный момент открыто скриптом.

  2. Универсальный (не зависящий от сервера данных) Модули / механизм обработки ошибок

При выполнении сохраненного процесса он вернул следующее сообщение об ошибке.

DBD :: Sybase :: st выполнить не удалось: сервер номер сообщения = 27000 серьезность = 16 состояние = 1 строка = 4 сервера = SYBDEV_HYD процедура = j_err текст = но этот делает [для выписки "EXEC sandbox..j_err"] в /usr/local/lib/perl5/site_perl/5.8.6/DBIx/ContextualFetch.pm строка 51.

Поскольку пользователь этого скрипта не технарь, он пытается сообщить только сообщение «Но этот делает» (которое появляется после текста =). Хотя я могу разобрать это, пытаясь выяснить, существует ли какой-либо универсальный модуль, поскольку другой сервер данных (например, MySQL, SQL Server и т. Д.) Может иметь свой собственный способ сообщения об ошибке msg.

1 Ответ

3 голосов
/ 31 октября 2009

Я не совсем уверен, что вы спрашиваете, но вы найдете много информации, прочитав документацию для DBD :: Sybase и DBI . Возможно, вам придется самостоятельно отслеживать количество подключений (см. Пример для DBI-> connect ).

Для обработки ошибок вы, вероятно, должны просто составить разумное диагностическое сообщение вместе с номером строки - вы можете легко сделать это с помощью warn () или carp () .

Пожалуйста, не стесняйтесь редактировать свой вопрос с более подробной информацией о том, что вы пытаетесь сделать; Некоторый пример кода будет полезен.

...