[linux] Mail .forward /Perl

[Andrej Hosna]

Koniec Sveta wrote:

> Cafte
>
>   Chcel som urobit nieco podobne ale zial skoncil som na tom ze
> ked dam do .forwardu | a meno suboru tak mi ho nespusti :(( neviete preco
> ..?
>
> toto mi napise
>
> user na pokus.sk  doesn`t have valid shell for mailing to programs
>
>   Dikes Krtko
>
> >From: Peter Mikula <mico na pobox.sk>
> >Reply-To: linux na rak.isternet.sk
> >To: linux na rak.isternet.sk
> >Subject: Re: [linux] Mail .forward /Perl
> >Date: Wed, 22 Sep 1999 14:58:32 +0200 (CEST)
> >
> > >
> > > Ahojte!
> > > Potreboval by som spravit nieco taketo:
> > > Ak pride mail na adresu konto na pocitac
> > > tak sa pusti perl script a zaloguje riadok Subject: a napr. Odosielatela
> > >
> > > mailu do /var/log/konto.log
> > >
> > > Skusil som nieco taketo:
> > > vytvoril som uzivatela konto ma $home /home/konto
> > > vytvoril som mu tam subor .forward ktory obsahuje toto:
> > > konto <-aby ten mail dosiel na adresu konto na pocitac
> > > |/www/cgi-bin/zaloguj.pl
> > >
> > > subor /www/cgi-bin/zaloguj.pl obsahuje toto:
> > > #!/usr/bin/perl
> > > open (FH,"</var/log/konto.log");
> >
> >       -- otvaras na citanie :(( a okrem toho pravdepodobne i tak nemas
> >prava
> >        na zapis do /var/log
> >
> > > print FH "Haluz";
> > > close FH;
> > >
> > > 2.) Ako vycucnem Subject + Odosielatela z mailu
> >
> >
> ># nacitaj si hlavicku (oddelovac prazdny riadok)
> >#
> >while( chomp( $line = <STDIN>)){
> >     ($name, $val) = ($line =~ /([^:]+):\s+(.*)/);
> >     $HEADER{"\L$name"} = $val;
> >}
> >
> ># vyber co potrebujes (field names su malymi pismenami :))
> >#
> >print $fh "Odosielatel: $HEADER{'from'}\n"
> >
> >
> >                       mico
> >
> >PS: loguj cez syslog ... (na CPANe nejake syslog modules su)
> >PS: skus pouzit namiesto .forward .procmailrc (ak mas local delivery
> >clienta procmail)
> >
>
> ______________________________________________________
> Get Your Private, Free Email at http://www.hotmail.com

ahoj!
ja som konecne pokrocil dalej a zistil som ze ten subor .forward musi vlastnit
ten user ktoreho postu forwardujes teda
ls -l /home/uzivatel/.forward ->
rwxr.x... uzivatel skupina
a okrem toho zrejme musi mat ten uzivatel priradeny default shell /bin/bsh alebo
csh alebo co uz xces

Adino
adino na atlas.cz