Home Files
Adminer
Execute Command
PHP Eval
Symlink
File Upload
Owner :
www-data
PHP Version
5.6.40-0+deb8u12
Disk Space
40.98 GB
Server Addr
19-www4
Your IP
10.10.10.40
Edit File
File:
#!/usr/bin/perl # Delete a bunch of user mappings require './qmail-lib.pl'; &ReadParse(); &error_setup($text{'sdelete_err'}); @d = split(/\0/, $in{'d'}); @d || &error($text{'adelete_enone'}); @assigns = &list_assigns(); foreach $d (@d) { ($assign) = grep { $_->{'address'} eq $d } @assigns; if ($assign) { &delete_assign($assign); } } &webmin_log("delete", "assigns", scalar(@d)); &redirect("list_assigns.cgi");