2 use OpenAFS
::CMU_copyright
;
3 use OpenAFS
::util
qw(:DEFAULT %AFS_Help);
10 my ($host, @hosts, $this, $cell, $cnt);
14 $cell = &AFS_fs_wscell();
16 &AFS_bos_removeuser(localhost,[testuser1],);
17 @hosts = &AFS_bos_listusers(localhost,);
18 while ($this = shift(@hosts)) {
19 if ($this ne "admin") {