Re^3: extracting dissimilar lines

That would fail if the second line contains more than one '='. But, if you think there's value in replacing trivial regexes (which can be dealt with by the optimizer) with complicated ones, why not:

$/ = "";
/=(\N+)\n[^=]+=\1\n/ or print while <>;
[download]

Or, as a one-liner:

perl -00ne'/=(\N+)\n[^=]+=\1\n/ or print' data-file
[download]

Comment on Re^3: extracting dissimilar lines Select or Download Code

Replies are listed 'Best First'.
Re^4: extracting dissimilar lines by CountZero (Bishop) on Mar 26, 2012 at 22:22 UTC
Even better! CountZero A program should be light and agile, its subroutines connected like a string of pearls. The spirit and intent of the program should be retained throughout. There should be neither too little or too much, neither needless loops nor useless variables, neither lack of structure nor overwhelming rigidity." - The Tao of Programming, 4.1 - Geoffrey James My blog: Imperial Deltronics	[reply]

Replies are listed 'Best First'.

Re^4: extracting dissimilar lines
by CountZero (Bishop) on Mar 26, 2012 at 22:22 UTC

CountZero

A program should be light and agile, its subroutines connected like a string of pearls. The spirit and intent of the program should be retained throughout. There should be neither too little or too much, neither needless loops nor useless variables, neither lack of structure nor overwhelming rigidity." - The Tao of Programming, 4.1 - Geoffrey James

My blog: Imperial Deltronics

[reply]