Shell Programming and Scripting

Nearly there...

Panyam: That works alright... but its only outputting the results of the section I'm working on, the rest of the file is lost... trying to think if there's a way to leave the rest of the file through untouched.

Radoulov: That works too... it even leaves the contents of the rest of the file... but removes the start and stop pattern from the file that helps see whats going on. The start of each section has a line containing the word 'section'. I've tried including in your script via the following

Code:

perl -ne'
  $a = $_ if /section/;
  $p = $_ and next if /line protocol/;
  $s = $_ and s/^[^:]+:\s*|\d+\s+(frame|ignored),?//g;
  print $a, $p, $s if grep /[^0]/, @{[/(\d)/g]}
  ' infile

but it doesn't work. Prints the section delimiter between every interface

---------- Post updated at 08:02 AM ---------- Previous update was at 07:32 AM ----------

Minor miracle... figured it out....

Code:

perl -ne'
  $a = $_ if /section/;
  $p = $_ and next if /line protocol/;
  $s = $_ and s/^[^:]+:\s*|\d+\s+(frame|ignored),?//g;
  print $a if grep /section/, @{[$_]};
  print $p, $s if grep /[^0]/, @{[/(\d)/g]}
  ' infile

Thanks for all the suggestions...