如何在tcl中实现getpwnam/getpwuid等

tcl是否有标准的NSS查找方法（getpwnam，setpwent，…）

tcl没有将它们公开为API（它实际上也没有在内部使用它们），但我相信扩展包确实支持它们。例如：

package require TclX

set uid [id convert user $tcl_platform(user)]
puts "Your userid is $uid and you are a member of these groups: [id groups]"

如果您使用的是ActiveTcl，那么您肯定已经有了可用的TclX包（已经安装或可从茶壶存储库获得）