Perl DBI (интерфейс базы данных) не обеспечивает передачу уже открытого дескриптора базы данных драйверу - интерфейс предполагает, что (DBI плюс соответствующий драйвер базы данных или модуль DBD :: XyzDBMS) установит соединение. Поэтому, в лучшем случае, вы будете писать код для расширения DBI, чтобы учесть это, а также расширять соответствующий DBD для его поддержки, что является совсем нетривиальным упражнением.
Итак, почему вы думаете, что это хорошая идея - в чем выгода безопасности, если вы делаете это таким образом, а не просто позволяете DBI обрабатывать соединение?
Встраивание паролей в приложение - неправильный путь, так как многие точки зрения трудно понять, с чего начать:
- Смена пароля означает перекомпиляцию и повторный выпуск программ, поэтому этого никогда не произойдет.
- Каждый использует одно и то же имя пользователя и пароль для подключения к базе данных или веб-службе, поэтому вы не знаете, кто выполняет подключение.
- Пароли будут обнаруживаться в объектных файлах - это ставка на то, что если злоумышленник действительно заинтересован, он сможет их найти.
- Etcetera.
«Безопасность через неизвестность» вовсе не безопасна!
Но это то, что вы предлагаете использовать.
Пожалуйста, получите несколько советов о том, как писать безопасное программное обеспечение от тех, кто знает. Или почитайте несколько прекрасных книг на эту тему.