mssqlサーバーをシャットダウンし、いくつかの操作を行ってから再起動する必要があるperlスクリプトを書いています.1つの方法はnetstatを使用してサービスを停止することですが、それを使用することはできません. そこで、DBI と DBD::ODBC モジュールをインストールしてみました。次のコードで接続してクエリを実行できます
use DBI;
my $data_source = q/dbi:ODBC:AUTOMATION_WOW64/;
my $user = q/pa/;
my $password = q/DCE/;
# Connect to the data source and get a handle for that connection.
my $dbh = DBI->connect($data_source, $user, $password)
or die "Can't connect to $data_source: $DBI::errstr";
my $str=$dbh->prepare("select SERVERPROPERTY('edition')");
$str->execute();
my @row;
while (@row = $str->fetchrow_array) { # retrieve one row
print join(", ", @row), "\n";
}
しかし、たくさん検索した後でも、サーバーをシャットダウンできる wch を使用したクエリが見つかりません。sql query からサーバーをシャットダウンできるかどうかを知りたいだけです。私はmysqlサーバー用のものを見つけました
$rc = $dbh->func('shutdown', 'admin');
このリンクhttp://metacpan.org/pod/DBD::mysqlで、これ に似たものが mssql サーバーに存在するかどうか教えてください。