note
Anonymous Monk
It is useful to look at various tutorials describing the command-line tool <tt><b>awk</b></tt> (which was actually one of the early inspirations for Perl ...) to see how problems like these can be handled in-general. (Awk is so similar to Perl that there actually exists an <tt><b>a2p</b></tt> tool which will generate a Perl equivalent to an awk program. Such a program basically consists of a series of regular-expression patterns, each accompanied by code that is to be executed when that pattern is matched. The Perl solution previously posted in this thread is much the same well-proved approach. Some of the lines-of-interest will capture data for later use, while other lines-of-interest (and perhaps, end-of-file) will cause output to be generated.
1214184
1214184
-4