Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!usc!wuarchive!zaphod.mps.ohio-state.edu!cis.ohio-state.edu!tut.cis.ohio-state.edu!ucbvax!iwarp.intel.com!news
From: merlyn@iwarp.intel.com (Randal L. Schwartz)
Newsgroups: comp.windows.x
Subject: Re: Inserting replies in xmh (Was: xmh bug -- more)
Message-ID: <1991May23.181715.24766@iwarp.intel.com>
Date: 23 May 91 18:17:15 GMT
References: <9105022125.AA24441@osf.osf.org> <11427@mirsa.inria.fr>
Sender: news@iwarp.intel.com
Reply-To: merlyn@iwarp.intel.com (Randal L. Schwartz)
Organization: Stonehenge; netaccess via Intel, Beaverton, Oregon, USA
Lines: 18
In-Reply-To: colas@celeste.inria.fr (Colas Nahaboo)

In article <11427@mirsa.inria.fr>, colas@celeste (Colas Nahaboo) writes:
| What about a perl script? this is the one I use...
| I am NOT a perl GURU, so my perl style is surely bad. However, real perl hackers
| will surely start a contest for the smallest perl script doing this job :-)
[22 line script deleted]

Gosh.  What about:

perl -ne 'print "> $_" unless 1../^$/'

Short.  Sweet.  Perl.

print "Just another Perl hacker,"
-- 
/=Randal L. Schwartz, Stonehenge Consulting Services (503)777-0095 ==========\
| on contract to Intel's iWarp project, Beaverton, Oregon, USA, Sol III      |
| merlyn@iwarp.intel.com ...!any-MX-mailer-like-uunet!iwarp.intel.com!merlyn |
\=Cute Quote: "Intel: putting the 'backward' in 'backward compatible'..."====/