Help for this page
system "/usr/bin/passwd", $username;
print "Password: "; chomp(my $passwd = <STDIN>); ... system '/usr/sbin/useradd', "-u $uid", '-s', $shell, '-p', $passwd, '-g 100', '-m', $username;