mysql - DBはperlを使用して存在します

Question

perlを使用してDBが存在するかどうかを確認する方法はありますか？その迅速かつ簡単なもの。しかし、私はまだperlとDBに慣れています

score 4 · Accepted Answer

DBIモジュールは、perlのデータベースにアクセスして操作するための一般的な方法です。接続をテストするDBIの使用例を次に示します。

use DBI;

$user = 'donny';
$pw = 'ppp';
$dsn = 'basetest';
$dbh = DBI->connect($dsn, $user, $pw) or die "Unable to connect: $DBI::errstr\n";

最後の行は、次のようなものにすることもできます。

$dbh = DBI->connect('dbi:Oracle:',$user.'@'.$password,$dbconnectstring);

または同様の何か-意味のあるように最初のパラメータを編集するだけです。

ご覧のとおり、DBが見つからない場合は接続できなくなります。

DBIに関連するドキュメントは次のとおりです。http： //dbi.perl.org/docs/

補足：また、perlスクリプト内でsqlplus（または任意のコマンドライン）にアクセスできることに注意してください。バックティックを使用するだけです。マシンで利用可能なツールがある場合は、その方法を確認する価値があるかもしれません。

1 に答える 1