bashclub/piler
1
0
Fork 0
mirror of https://bitbucket.org/jsuto/piler.git synced 2024-12-24 18:40:13 +01:00
Code Issues Packages Projects Releases Wiki Activity

improved the milter script

Browse Source
This commit is contained in:
SJ 2015-05-07 11:04:26 +02:00
parent a47d2af616
commit 4d1d649240
1 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
contrib/milter/pilter.pl
View File

@ -8,6 +8,7 @@ use Data::Dumper;
use Sys::Syslog; use Sys::Syslog;
use Sys::Syslog qw(:DEFAULT setlogsock); use Sys::Syslog qw(:DEFAULT setlogsock);
use Time::HiRes qw(gettimeofday); use Time::HiRes qw(gettimeofday);
use Getopt::Long;
my $savedir = "/var/piler/imap"; my $savedir = "/var/piler/imap";
my $username = 'piler'; my $username = 'piler';
@ -22,7 +23,17 @@ my $curdir = "cur";
my $newname; my $newname;
my $curname; my $curname;
my $messageid; my $messageid;
my $help = 0;
my $opts = GetOptions(
"conn=s" => \$conn,
"username=s" => \$username,
"savedir=s" => \$savedir,
"h" => \$help,
"help" => \$help
);
if($help == 1) { die("usage: $0 --conn inet:33333\@127.0.0.1 --username piler --savedir /var/piler/imap"); }
chdir $savedir || die("cannot chdir to $savedir"); chdir $savedir || die("cannot chdir to $savedir");