Hi Choroba,

As a side note:

Instead of parsing the sequence number $line you could apply the technique described in Re^4: grep trouble (body of flip-flop range) to skip the boundaries of the flip and the flop. :)

Cheers Rolf

(addicted to the Perl Programming Language and ☆☆☆☆ :)

UPDATE

in hindsight it's a bad idea to use something like:

#!/usr/bin/perl
use warnings;
use strict;

while (<DATA>) {
    if (/^INFO START$/ .. /^END$/ and not //) {
        print "$_";
    }
}

__DATA__
... ignore ...

INFO START

STIME      ETIME     COLUMN3    COLUMN4   COLUMN5
aaaa1      bbb1        ccc1       ddd1      eee1
aaaa2      bbb2        ccc2       ddd2      eee2
aaaa3      bbb3        ccc3       ddd3      eee3
aaaa4      bbb4        ccc4       ddd4      eee4

END

  ... ignore again ...

[download]

While it does only print the inner range ... 

 
STIME      ETIME     COLUMN3    COLUMN4   COLUMN5
aaaa1      bbb1        ccc1       ddd1      eee1
aaaa2      bbb2        ccc2       ddd2      eee2
aaaa3      bbb3        ccc3       ddd3      eee3
aaaa4      bbb4        ccc4       ddd4      eee4

[download]
... it's vulnerable to mess up the empty match // (i.e. match again the last successfully matched regular expression) by any other regex happening within the if-branch. :-/

The usual trap of global dependencies!

In reply to Re^2: Extract table from a block of text (updated) by LanX
in thread Extract table from a block of text by reaper9187

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.