ldap-clean

来自「GForge 3.0 协作开发平台 支持CVS, mailing lists, 」· 代码 · 共 14 行

#!/usr/bin/perl
#
#  Clean LDAP database 
#  by [e-mail] 2000-10-18
#  $Id: ldap-clean,v 1.2 2002/12/23 13:17:14 lo-lan-do Exp $
#

require("include.pl");  # Include all the predefined functions
&parse_local_inc;

$cmd = "${ldap_prefix}ldapdelete -h $sys_ldap_host -p $sys_ldap_port -D '$sys_ldap_admin_dn' -W -r '$sys_ldap_base_dn'";
print "Destroying LDAP database...\n";
system($cmd);