Как сделать getpwnam/getpwuid и т. д. в Tcl

Question

Есть ли в tcl стандартный способ поиска NSS (getpwnam, setpwent,...)

Answer 1

Tcl не представляет их как API (на самом деле они тоже не используют их внутри), но пакет расширений TclX поддерживает именно то, что вы хотите, я верю. Например:

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 (либо уже установлен, либо доступен из репозитория чайника).