File manager - Edit - /usr/local/usermin-1.860/mailbox/save_group.cgi
Back
#!/usr/bin/perl # save_group.cgi # Save, add or delete an address group entry use strict; use warnings; our (%text, %in); require './mailbox-lib.pl'; if ($ENV{'REQUEST_METHOD'} eq 'GET' || $ENV{'REQUEST_URI'} =~ /gdelete=/) { &ReadParse(); } else { &ReadParseMime(); } if ($in{'gdelete'} ne '') { &delete_address_group($in{'gdelete'}); } else { &error_setup($text{'group_err'}); $in{'group'} =~ /\S/ || &error($text{'group_egroup'}); $in{'members'} =~ /\S/ || &error($text{'group_emembers'}); $in{'members'} =~ s/\r|\n/ /g; if ($in{'gadd'}) { &create_address_group($in{'group'}, $in{'members'}); } else { &modify_address_group($in{'gedit'}, $in{'group'}, $in{'members'}); } } &redirect("list_addresses.cgi?mode=groups");
| ver. 1.4 |
Github
|
.
| PHP 7.4.33 | Generation time: 0.72 |
proxy
|
phpinfo
|
Settings