1 |
## --------------------------------------------------------------------------- |
2 |
## |
3 |
## $Id: Object.pm,v 1.3 2003/01/20 16:54:22 joko Exp $ |
4 |
## |
5 |
## dispatchmail - A simple mail filter done in perl with CPAN-module "Mail::Audit" |
6 |
## |
7 |
## --------------------------------------------------------------------------- |
8 |
## $Log: Object.pm,v $ |
9 |
## Revision 1.3 2003/01/20 16:54:22 joko |
10 |
## + sub fromPackage: refactored from libp's 'getNewPerlObjFromPkgName' or s.th.l.th. |
11 |
## |
12 |
## Revision 1.2 2002/12/27 16:05:42 joko |
13 |
## + played with Devel::CallerItem and Devel::StackTrace |
14 |
## |
15 |
## Revision 1.1 2002/12/13 21:46:29 joko |
16 |
## + initial check-in |
17 |
## --------------------------------------------------------------------------- |
18 |
|
19 |
|
20 |
=pod |
21 |
|
22 |
=head1 ChangeLog - History |
23 |
|
24 |
=head3 2003-01-22, joko@netfrag.org |
25 |
|
26 |
o mail2thread.pl |
27 |
x now based on object-infrastructure from nfo/perl/libs |
28 |
x setup nfo/perl/libs at a common location - propose this for nfo-sysadmin-rfcs |
29 |
cd /data/libs |
30 |
export CVSROOT=/var/lib/cvs |
31 |
cvs checkout nfo/perl/libs |
32 |
x refactored recieveMail.pl |
33 |
x created: etc/ bin/ var/ doc/ |
34 |
x renamed to 'dispatchmail' |
35 |
cd /data/opt |
36 |
cvs checkout -d dispatchmail nfo/perl/scripts/dispatchmail |
37 |
cd dispatchmail |
38 |
./install |
39 |
x now using 'run_cmd' from org::netfrag::shortcuts |
40 |
x new: install-script (creates symbolic links to dispatchmail in /etc/mail/smrsh/ and /usr/local/bin/) |
41 |
x new: just put "|dispatchmail" into your "~/.forward"-file! |
42 |
x use file '.recievemailrc' to specify the location of the rules-file? |
43 |
now uses "$HOME/.recievemailrc.pm" directly! |
44 |
x refactored to Mail::Audit::Dispatch |
45 |
o implement Mail::Audit::Newsgate |
46 |
x perl -MCPAN -eshell |
47 |
x install Net::NNTP |
48 |
x install News::Article |
49 |
x add account to inn: 'collector' |
50 |
x add line to /etc/news/nnrp.access |
51 |
*:Read Post:collector:col5%:* |
52 |
x root@quepasa:/home# /etc/init.d/inn reload |
53 |
o TODO: implement Mail::Audit::Faxgate |
54 |
x checked in 'mail-handler' (by janosch) to bin/ - refactor from that! |
55 |
o better/automated setup (from cvs|package) |
56 |
(see steps needed in attachment....) |
57 |
o autocreate folders |
58 |
problem: |
59 |
loading rules from "/data/home/newscollector/Mail/.rules.pm" |
60 |
running "rules::dispatch" |
61 |
delivering to: /data/home/newscollector/Mail/Inbox |
62 |
deliver_to path "/data/home/newscollector/Mail/Inbox" doesn't exist |
63 |
defaulting to spool delivery (/var/spool/mail/) |
64 |
solution(s): |
65 |
---> add tip here: "do a 'touch Inbox' in this case? |
66 |
---> add feature here: just create the folder automagically, if "autocreateFolders = 1" in configuration!!! |
67 |
|
68 |
|
69 |
=head3 2002-11-09, joko@netfrag.org |
70 |
|
71 |
x recieveMail now can run globally (/etc/mail/smrsh!) |
72 |
x $HOME is taken from $ENV{HOME} or $ENV{PWD} |
73 |
x rules are taken from $HOME/Mail/.rules.pm |
74 |
x fallback mechanism(s) |
75 |
x bugfixes |
76 |
|
77 |
|
78 |
=head3 2002-10-14, joko@netfrag.org |
79 |
|
80 |
x $LOGFILE is used now (recievemail.log) |
81 |
x tracing (uses $LOGFILE) |
82 |
x checks delivery path for existance - changes $LOGFILE if needed |
83 |
|
84 |
|
85 |
=head3 2002-07-17, joko@netfrag.org |
86 |
|
87 |
x added filtering by target (destination-routing) - looks in "to", "cc" and "bcc" |
88 |
|
89 |
|
90 |
=head3 2001-12-05, joko@netfrag.org |
91 |
|
92 |
x initial internal release |
93 |
|
94 |
|
95 |
=cut |
96 |
|
97 |
1; |