perl代码 FreeBSD 大量转档建帐号程式 _云知道

##############
# adduser.pl #
##############

#!/usr/bin/perl
$filename = "class.txt" ;
open(file,$filename) ;
while( $name= ) {
chop $name ;
@name_array = split /,/,$name ;
$PW_COMMAND="/usr/sbin/pw useradd $name_array[0] -m -h 0" ;
$fname="|".$PW_COMMAND ; open(OUT, $fname) ;
print OUT $name_array[1] ;
close(OUT) ;
print "UserName: ",$name_array[0],"tt",
"PassWord: ",$name_array[1],"n";
}
print "n" ;
close(file) ;

################
# /etc/pw.conf #
################
logfile /root/pw.log
defaultpasswd yes
home /home
defaultshell /usr/local/bin/bash
defaultgroup user
reuseuids yes
minuid 2000

##############
# 额外说明 #
##############
1.home -->预设的家目录
defaultshell -->预设的shell路径
defaultgroup -->预设的群组
1.minuid -->起始的uid

############
# 使用方式 #
############
1.先备档案
a. adduser.pl
b. /etc/pw.conf
c. 帐号的来源档 class.txt
形式：
帐号,密码
帐号,密码
2.步骤
a.将adduser.pl改为可以执行
chmod 700 adduser.pl
b.adduser.pl及class.txt需在同一目录下，不然则需更改路径
c.执行adduser.pl
d.完成

perl代码 FreeBSD 大量转档建帐号程式

推荐阅读

怎么种蒜苗用水种还是泥

花胶膏怎么熬制

彩虹的七种正确颜色分别是什么？

王冕僧寺夜读文言文翻译简短王冕僧寺夜读文言文翻译

如何让电脑的上网速度达到最快

龙武手游帮会怎么玩如何加入帮会

国6可以买什么车？

1938年世界杯举办地

英国早上八点中国几点

mori手帐中分享详细操作方法

跸跋黄尘下然后别雌雄是什么意思

续长岛随拍

t63软卧多少钱，T63杨柳青补卧铺

我来教你QQ简洁模式颜色在哪设置

氢氧化铝电离方程式氢氧化铝电离方程式是什么

新基建概念简单介绍