perl - 如何使用 CMD 或 Perl 检查 Active Directory 中是否存在组名

Question

我正在尝试编写一个 Perl 脚本来检查 Active Directory 中是否存在用户组名称。对我来说重要的是，我不必加载额外的库，这就是我想使用 System 命令并调用 CMD 的原因。

我也考虑过调用 Power Shell 命令，但这有点问题，因为我们有很多没有 PS 的旧服务器。

Answer 1

这可能是一个迟到的答案；但是模块Net::LDAP可能适合您。如其主页所述；它是“为 Perl 程序实现 LDAP 服务 API 的模块集合。该模块可用于搜索目录或执行维护功能，例如添加、删除或修改条目。”

这个例子也可以通过他们的主页提供的例子来搜索一个对象：

use Net::LDAP;
$mesg = $ldap->search(@search_args);
@entries = $mesg->entries;