I agree with GrandFather's advice to not parse HTML with regexes, in general.  That being said, however, it's sometimes helpful to understand why some approach didn't work, as well as what would have been a way around the problem.

So, the thing with your code is the s/// operator not being aware of the incremental search position that you're trying to handle with the /c option of the outer matches. I.e., it always starts from the beginning of the string (even if you attempt to save/restore the current position using $pos = pos($tbltext); before, and pos($tbltext) = $pos; after the substitution code)...

One way around the problem would be to move the column substitution code into a subroutine, which you then simply call in a normal repeated (/g) substitution; 

my $tbltext = qq(<tr><td>a1</td><td>a2</td><td>a3</td><td>a4</td></tr>
+<tr><td>b1</td><td>b2</td><td>b3</td><td>b4</td></tr><tr><td>c1</td><
+td>c2</td><td>c3</td><td>c4</td></tr>);

sub fix_column {
    my $s   = shift;
    my $nth = shift;
    my $counter = 0;
    $s =~ s/(<td.*?\/td>)/
            ++$counter ==  $nth #is this the nth cell?
            ? "${1}newtext" #if yes, add "newtext"
            : $1 #otherwise, leave it
            /ge;
    return $s;
}

$tbltext =~ s/(<tr.*?>)(.*?)(<\/tr>)/$1.fix_column($2, 3).$3/ge;

print "$tbltext\n";
__END__
<tr><td>a1</td><td>a2</td><td>a3</td>newtext<td>a4</td></tr><tr><td>b1
+</td><td>b2</td><td>b3</td>newtext<td>b4</td></tr><tr><td>c1</td><td>
+c2</td><td>c3</td>newtext<td>c4</td></tr>

[download]

BTW, are you sure you want to insert the text in between the cells, not within?

(P.S.: I know, the <tr>...</tr> matching regex is not perfect... but I deliberately kept it simple for this demo.)

In reply to Re: Continuing after replacing nth occurrence by almut
in thread Continuing after replacing nth occurrence by knlst8

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.