[tpop3d-discuss] Re: bulletins - SOLVED!!
Chris Lightfoot
chris at ex-parrot.com
Mon, 25 Aug 2003 19:02:12 +0100
On Mon, Aug 25, 2003 at 06:53:40PM +0200, Michal Czerwinski wrote:
> On Mon, Aug 25, 2003 at 03:49:01PM +0300, ODHIAMBO Washington wrote:
>
> >
> > 1. ADD use GDBM_File; at the top of your perl script
> >
> > 2. Substitute:
> >
> > my $r = "$req->{local_part}@$req->{domain}";
> >
> > with
> >
> > my $r = $req->{local_part} . '@' . $req->{domain};
> >
> > 3. Substitute
> >
> > tie(%rr, 'GDBM_File', $recips, &GDBM_WRCREAT, 0600);
> >
> > with
> >
> >
> > tie(%rr, 'GDBM_File', $recips, &GDBM_File::GDBM_WRCREAT, 0600);
>
> Requesting changes update in CVS repository (if not made)
I've now put the script itself in as scripts/bulletins.
I'd welcome other bulletin script implementations.
--
``When I am right, I get angry. Churchill gets angry when he's wrong.
So we were often angry at each other.'' (Charles De Gaulle)