php - 通过命令行获取 Windows 7 ODBC 数据源列表

Question

我需要从我的计算机中检索信息，我可以通过 PHP 脚本获取它，但如果可能的话最好使用 Perl 脚本。基本上，我需要用户定义的 ODBC 数据源列表及其服务器 URLS(如果已定义)。

我看到了this answer关于如何使用 PHP 从注册表中提取它，但我也需要服务器 URL。

Answer 1

我非常非常快地将这个 Perl 脚本组合在一起，但它似乎可以满足您的需要。它将连接名称作为键放入散列中，然后将服务器字符串作为其值。请注意，根据您的问题，这只会获取用户定义的来源(尽管适应收集系统 DSN 是微不足道的):

use warnings;
use strict;

use Win32::TieRegistry; 

my $odbc_key = $Registry->{'CUser\\Software\\ODBC\\ODBC.INI'};

my %sources;

for (keys %$odbc_key) {
    next if /ODBC Data Sources/;
    s/\\//g;
    $sources{$_} = $odbc_key->{"$_\\Server"};
}

for my $dsn (keys %sources) {
    print "dsn: $dsn, server: $sources{$dsn}\n";
}

输出:

dsn: Test, server: localhost
dsn: Blah, server: yay.blah.com