我要用perl写一个添加用户的脚本，应该怎么做？

emylekao

给个程序样例吗？

无双

$cmdline = "adduser $username";
qx($cmdline)

emylekao

那么我想想知道，如果我用perl写一个这样的脚本，是不是可以放在网上，那么如果有人运行这个cgi，就可以添加用户？

libinary

脚本到没什么，如果是cgi的话主要是权限问题，cgi编程我也不太了结，一般的浏览用户恐怕没有这么大的权限吧，否则岂不是乱套了。

另外，你是要添加什么用户？系统用户吗？

emylekao

不是，事实上，我想做一个能开设虚拟主机的程序。如果可以添加用户，不就可以很方便的添加用户，然后让用户自己更改密码、上传文件什么的。

哪位高手能说说这方面的具体方法。从哪方面入手。我现在一点头绪都没有。有没有这方面的参考资料？

fundawang

如果你想开 www.nease.net/~hello 这样全自动虚机的话，是这个思路的。应该不算太麻烦，先在 httpd.conf 中弄一个通配所有用户的虚拟目录，然后再添加用户就行了。找找 Apache 文档中这方面的内容即可。