develooper Front page | perl.golf | Postings from June 2009

Re: Another one-liner?

Thread Previous | Thread Next
From:
Daniel Tiefnig
Date:
June 24, 2009 11:26
Subject:
Re: Another one-liner?
Message ID:
4A4231CE.7060309@gmx.at
Phil Carmody wrote:
> I needed to remove blank-line-separated chunks of code from a text 
> file if those chunks contained any lines which were 'too long'.
[...]
> If you think how little it does, it's got to be one-linerable, no?

Here's one that does split on lines with whitespace too, but is much
less elegant than my first one:

  perl -0777 -F'(?<=\n)\s*(?=\n)' -ane'/.{65535}/||print for@F'

Maybe one can save one or the other stroke with a smarter solution of
the newline issue...

lg,
daniel

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About