如何在Windows上的Perl中获取用户和组信息？

Question

Perl有几个内置函数,用于访问Unix系统(以及支持时的其他地方)的/ etc/passwd,以获取用户和组信息.例如,

my $name = getpwuid($uid);

将返回给定用户ID的用户名,如果没有此类用户则返回undef.

如果Perl脚本需要可移植并在Unices和Windows上运行,那么应该如何访问用户和组信息？ActivePerl似乎支持User :: grent和User :: pwent模块,它们提供对/ etc/passwd的字段访问 - 即使在Windows中也是如此.奇怪的是,它们不支持内置函数getpw*和getgr*.有什么其他选择吗？

Answer 1

你可以使用该Win32::NetAdmin模块.

UserGetAttributes和GroupIsMember看起来像他们做你的需要.