$
$ # display the content of the data file "f7"
$ cat -n f7
     1  RCS file: /cvsroot/eclipse/org.eclipse.debug.core/core/org/eclipse/debug/core/IBreakpointListener.java,v
     2  head: 1.14
     3  branch:
     4  locks: strict
     5  access list:
     6  keyword substitution: o
     7  total revisions: 15;    selected revisions: 2
     8  description:
     9  ----------------------------
    10  revision 1.14
    11  date: 2006-06-12 15:42:24 -0500;  author: darin;  state: Exp;  lines: +2 -2;
    12  copyright updates
    13  ----------------------------
    14  revision 1.13
    15  date: 2006-05-16 09:34:00 -0500;  author: darin;  state: Exp;  lines: +1 -1;
    16  javadoc spelling errors
    17  =============================================================================
    18  RCS file: /cvsroot/eclipse/org.eclipse.debug.core/core/org/eclipse/debug/core/IBreakpointManager.java,v
    19  head: 1.36
    20  branch:
    21  locks: strict
    22  access list:
    23  keyword substitution: o
    24  total revisions: 38;    selected revisions: 4
    25  description:
    26  ----------------------------
    27  revision 1.31
    28  date: 2007-03-26 20:47:29 -0500;  author: darin;  state: Exp;  lines: +1 -1;  commitid: 61604608779a4567;
    29  update copyrights
    30  ----------------------------
    31  revision 1.30
    32  date: 2007-01-17 09:01:45 -0600;  author: inigo;  state: Exp;  lines: +3 -2;  commitid: 614345ae3a564567;
    33  javadoc settings and fixes
    34  ----------------------------
    35  revision 1.29
    36  date: 2006-06-12 15:42:24 -0500;  author: montoya;  state: Exp;  lines: +2 -2;
    37  copyright updates
    38  ----------------------------
    39  revision 1.28
    40  date: 2006-05-16 09:34:00 -0500;  author: darin;  state: Exp;  lines: +1 -1;
    41  javadoc spelling errors
    42  =============================================================================
    43  RCS file: /cvsroot/eclipse/org.eclipse.debug.core/core/org/eclipse/debug/core/IBreakpointManagerListener.java,v
    44  head: 1.6
    45  branch:
    46  locks: strict
    47  access list:
    48  keyword substitution: kv
    49  total revisions: 6;    selected revisions: 1
    50  description:
    51  ----------------------------
    52  revision 1.4
    53  date: 2005-02-23 23:58:22 -0600;  author: darins;  state: Exp;  lines: +1 -1;
    54  CPL --> EPL
    55  =============================================================================
$
$
$ # run the Perl script that processes the file "f7"
$
$ perl -lne 'BEGIN {
               $delim = "|";
               print join $delim, ("File", "Total Revisions", "Authors", "Lines Added", "Lines Deleted")
             }
             if (/^RCS file:.*\/(.*?),.*$/) {
               $file = $1;
             } elsif (/^total revisions: (\d+);.*$/) {
               $revcount = $1;
             } elsif (/^.*author: (\w+);.*lines: \+(\d+) -(\d+).*$/) {
               $authors{$1}++;
               $added += $2;
               $deleted += $3;
             } elsif (/^==+$/) {
               print join $delim, ($file, $revcount, join(",", keys %authors), $added, $deleted);
               $file = "";
               $revcount = "";
               %authors = ();
               $added = 0;
               $deleted = 0;
             }
            ' f7
File|Total Revisions|Authors|Lines Added|Lines Deleted
IBreakpointListener.java|15|darin|3|3
IBreakpointManager.java|38|inigo,darin,montoya|7|6
IBreakpointManagerListener.java|6|darins|1|1
$
$