SME Server's panel to create simple list. It works like groups email, except that you can enter raw (including external) email addresses instead of having to select existing user accounts
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
19 lines
285 B
19 lines
285 B
12 years ago
|
#!/usr/bin/perl -w
|
||
|
|
|
||
|
|
package esmith;
|
||
|
|
|
||
|
|
use strict;
|
||
|
|
use Errno;
|
||
|
|
|
||
|
|
my $event = $ARGV [0];
|
||
|
|
my $list = $ARGV [1];
|
||
|
|
|
||
|
|
die "list name argument missing." unless defined ($list);
|
||
|
|
|
||
|
|
$list =~ s/\./:/g;
|
||
|
|
unlink "/var/qmail/alias/.qmail-$list";
|
||
|
|
unlink "/var/qmail/alias/.qmail-$list-default";
|
||
|
|
|
||
|
|
exit (0);
|
||
|
|
|