From owner-freebsd-questions Thu Oct 4 15:33:47 2001 Delivered-To: freebsd-questions@freebsd.org Received: from relay3-gui.server.ntli.net (relay3-gui.server.ntli.net [194.168.4.200]) by hub.freebsd.org (Postfix) with ESMTP id DD30F37B40D for ; Thu, 4 Oct 2001 15:33:28 -0700 (PDT) Received: from pc2-card3-0-cust79.cdf.cable.ntl.com ([213.107.2.79] helo=rhadamanth.private.submonkey.net ident=exim) by relay3-gui.server.ntli.net with esmtp (Exim 3.03 #2) id 15pH3V-0003Sk-00; Thu, 04 Oct 2001 23:33:25 +0100 Received: from setantae by rhadamanth.private.submonkey.net with local (Exim 3.33 #1) id 15pH3L-00042h-00; Thu, 04 Oct 2001 23:33:15 +0100 Date: Thu, 4 Oct 2001 23:33:15 +0100 From: setantae To: Chris Aitken Cc: freebsd-questions@FreeBSD.ORG Subject: Re: Getting an Email into a PHP/pl script Message-ID: <20011004233315.A15495@rhadamanth> Mail-Followup-To: Chris Aitken , freebsd-questions@FreeBSD.ORG References: <5.1.0.14.2.20011005074857.0320bf88@mail.ideal.net.au> <3BBCC9F7.EB932EE4@Visionnet.nl> <0c3701c14d18$3505c910$6401a8c0@workstation7> <20011004210925.22415.qmail@pb1.pair.com> <5.1.0.14.2.20011005074857.0320bf88@mail.ideal.net.au> <20011004230813.A15307@rhadamanth> <5.1.0.14.2.20011005081627.02ec7468@mail.ideal.net.au> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline User-Agent: Mutt/1.2.5i In-Reply-To: <5.1.0.14.2.20011005081627.02ec7468@mail.ideal.net.au>; from chris@ideal.net.au on Fri, Oct 05, 2001 at 08:22:30AM +1000 Sender: owner-freebsd-questions@FreeBSD.ORG Precedence: bulk List-ID: List-Archive: (Web Archive) List-Help: (List Instructions) List-Subscribe: List-Unsubscribe: X-Loop: FreeBSD.ORG On Fri, Oct 05, 2001 at 08:22:30AM +1000, Chris Aitken wrote: > At 11:08 PM 4/10/2001, setantae wrote: > > >You did say ``any'' help : > > > >I have a daemon half written in perl that periodically checks a mailbox > >in /var/mail to see if there's anything in it and then moves it into separate > >files. > > Something I did leave off my original email. We used to have a mailbox auto > responder perl script in place that had an email alias piped to the script > with the following line in the /etc/aliases > > alias: "|/location/to/perlscript.pl /location/to/responder.txt" > > Problem is, this system isn't in place any more, and there isn't a backup > of the old script I can even check up to see how it pulled the data into > the script. Well, if the message was just being piped to it then it would be something as simple as : while (<>) { # $_ now contains one line of the mail &do_stuff; } or : { local $/ = undef; while (<>) { # $_ now contains the entire email &do_stuff; } } Ceri -- keep a mild groove on To Unsubscribe: send mail to majordomo@FreeBSD.org with "unsubscribe freebsd-questions" in the body of the message