如何用Perl創建SQL Server數據庫？

Question

我有一個Perl腳本運行在Unix框中，其中一個任務是創建MySQL數據庫。我現在正在編寫一個Windows版本來創建Microsoft SQL Server數據庫，並且我無法弄清楚用於實際創建數據庫的函數/過程。

我用下面的語句來創建在Unix系統中的MySQL數據庫：

my($drh) = DBI->install_driver("mysql"); 
$drh->func('createdb', $databaseName, $host, $username, $password, 'admin'); 

什麼是相當於此爲SQL Server？

Answer 1

只要執行相關的「CREATE DATABASE」sql就像其他任何查詢一樣。顯然，首先您需要以具有相關權限的用戶身份連接到另一個數據庫。

Answer 2

func方法。來自Perldoc：

func方法可用於調用驅動程序實現的私有非標準和非可移植方法。請注意，函數名稱是作爲最後一個參數給出的。

[...]

參見INSTALL_METHOD（）的DBI :: DBD你如何避免需要使用FUNC（），並獲得驅動程序私有方法的直接訪問。

您可以使用install_method做你想做的事嗎？它更便攜一點？