Re: Segregating a Global Alias

[Paul Johnson <paul@xxxxxxxx>]

On Mon, Mar 24, 2014 at 05:47:57PM +0000, zzapper wrote:
> zzapper <david@xxxxxxxxxxxxxx> wrote in 
> news:XnsA2FAB2C8DE4F8davidrayninfocouk@80.91.229.13:
> 
> > Bart Schaefer <schaefer@xxxxxxxxxxxxxxxx> wrote in
> > news:CAH+w=7baCBR0KK+Uvhu8D53CPsVNvq4YSVsrbb35H1ReCHQZAA@xxxxxxxxxxxxxx: 
> > 
> >> 
> >> (){ perl -ne 's/(<\/\w+>)/$1\n/g; print' < $1 > $1.txt } NF
> >> 
> > inspired by this
> > 
> > for f in NF ; perl -ne 's/(<\/\w+>)/$1\n/g; print' < $f > $f.txt
> > 
> BTW this is perl one liner to put each XML tag on a newline. The input file 
> is 10mb and perl takes just seconds, i gave up trying to do this with vim 
> (-None) .
> 
> But can anyone else trump Bart's or my attempt?

$ perl -pi.orig -e 's|</\w+>(?!\n)\K|\n|g' NF

perhaps?

-- 
Paul Johnson - paul@xxxxxxxx
http://www.pjcj.net