[Date Prev][Date Next][Thread Prev][Thread Next]
[Search]
[Date Index]
[Thread Index]
Re: [FWP] A Perl Poem
On Tue, Feb 13, 2001 at 11:00:02AM +0000, Etienne Grossmann wrote:
> Here is to run it, assuming the mail is saved in tmpmail :
>
> perl -e 'eval $1 if ($a=join "",<>) =~/^(#!.*?)^===/ms' tmpmail
or pipe through 'grep -v ==== | perl -x' if your mailer will let you do that.
--
Paul Johnson - paulj@olsen.ch
==== Want to unsubscribe from Fun With Perl? Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
==== unsubscribe