DB存在使用perl

Question

有没有办法检查数据库是否存在使用perl？它快速简单。但我仍然习惯于perl和DB

Answer 1

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);

或类似的东西 - 只需编辑第一个参数即可。

如您所见 - 如果无法找到数据库，您将无法连接。

以下是与DBI相关的文档： http://dbi.perl.org/docs/

旁注：另请注意，您可以在perl脚本中访问sqlplus或任何命令行。只需使用反引号。如果您在机器上有可用的工具，那么检查这种方式可能是值得的。