Я думаю, что Ваш лучший выбор состоял бы в том, чтобы просто поместить это в Ваш блок выгоды:
throw;
И затем извлекают innerexception позже.
DBD :: Oracle, как известно, сложно компилировать, умноженное на Windows, и вам лучше просто не делать этого, если вы можете этого избежать. К сожалению, ActiveState не предоставляет PPM для него по причинам лицензирования , как и другие репозитории PPM , которые я просмотрел. Хотя ходят слухи, что ActivePerl 5.10.0.1003 поставляется с DBD-Oracle .
Если ваш сервер Oracle поддерживает ODBC, вы можете общаться с ним, используя DBD :: ODBC .
Если вы хотите попробовать, вот несколько специальных инструкций по установке DBD :: Oracle на Strawberry Perl , которые могут помочь.
Если у вас нет всех исходных файлов Oracle (* .h, * .c), вы можете установить DBD :: Oracle через ppm, как и ActiveState. Или скопируйте файлы библиотеки из дистрибутива ActiveState.