Hello clueless newbie, I was using your code and trying to include one more if condition.

As you already included the logic if "timing" (balanced parenthesized delimiter) present then only by searching the pattern "max_transition", it will delete the line.

Now I need to add one more condition, you might observed that if "direction : input" (for any pin group) condition arise, it will never delete "max_transition" line. And according to the given code, it will delete "max_transition" line for a input pin group where "timing" is present, which I do not want.

So I tried to include this 

    sub do_something_with {
        #warn Data::Dumper->Dump([\@_],[qw(*_)]),' ';
        my $string=shift;
        if ( $RE{some}{pattern}->matches(~m/^\s*direction\s*:\s*output
+\s*;/) )  {
        if ($string =~ m{timing +($RE{balanced}{-parens=>'()'} +$RE{ba
+lanced}{-parens=>'{}'})})  { # has a timing group
            # kill the max_transition line
            $string =~ s{^.*max_transition.*\r?\n}{}m;
            #warn Data::Dumper->Dump([\$string],[qw(*string)]),' ';
            };
        #return $string;
        };
    return $string;
    };

[download]

But while I am trying to execute I am getting error.

In reply to Re^2: Need to save a single line from delete on some special condition by anirbanphys
in thread Need to save a single line from delete on some special condition by anirbanphys

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.