diff options
author | Michael Adam <obnox@samba.org> | 2007-07-05 00:11:07 +0000 |
---|---|---|
committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 12:23:48 -0500 |
commit | ae23e6d04b8551e66b77995994a0c50cd880ea32 (patch) | |
tree | 0d1774183712f67254d7e754e4790064cb26f749 /examples | |
parent | 0c03c78af8f62ece2965e0f5a16c001aad61c8fa (diff) | |
download | samba-ae23e6d04b8551e66b77995994a0c50cd880ea32.tar.gz samba-ae23e6d04b8551e66b77995994a0c50cd880ea32.tar.xz samba-ae23e6d04b8551e66b77995994a0c50cd880ea32.zip |
r23713: Oops accidentially checked in the wrong file - sorry!
Michael
Diffstat (limited to 'examples')
-rwxr-xr-x | examples/scripts/users_and_groups/addusertogroups.pl | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/examples/scripts/users_and_groups/addusertogroups.pl b/examples/scripts/users_and_groups/addusertogroups.pl deleted file mode 100755 index f3e1bee9772..00000000000 --- a/examples/scripts/users_and_groups/addusertogroups.pl +++ /dev/null @@ -1,17 +0,0 @@ -#!/usr/bin/perl - -use strict; - -my $dc = "192.168.45.44"; -my $adminuser = "administrator"; -my $adminpw = "geheim"; -my $maxgroups = 5000; -my $startgroup = 0; -my $rpccli_cmd = "/usr/bin/rpcclient"; -my $testuser = "testgroups"; - -for (my $num = $startgroup; $num <= $maxgroups; ++$num) { - my $group = sprintf "%s%.05d", "group", $num; - print "adding user $testuser to group $group\n"; - system("net rpc -I $dc -U$adminuser\%$adminpw group addmem $group $testuser"); -} |