[32933] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 4210 Volume: 11

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri May 9 05:17:31 2014

Date: Fri, 9 May 2014 02:17:04 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)

Perl-Users Digest           Fri, 9 May 2014     Volume: 11 Number: 4210

Today's topics:
        Regexp to combine table cells <bart@nijlen.com>
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: Fri, 9 May 2014 01:59:53 -0700 (PDT)
From: Bart Van der Donck <bart@nijlen.com>
Subject: Regexp to combine table cells
Message-Id: <1c455dfa-f980-4cfd-bce4-a36a5501f379@googlegroups.com>

Hello,

I'm having difficulties to find a regular expression starting from the following input:

my $row = '
           <tr>
              <td>UNIQUESTRING</td>
              <td>A</td>
              <td>A</td>
              <td>A</td>
              <td>B</td>
              <td>B</td>
              <td>B</td>
              <td>B</td>
              <td>B</td>
              <td>A</td>
              <td>A</td>
              <td></td>
              <td></td>
              <td>C</td>
              <td></td>
            </tr>
           ';
           
What I would like to achieve:

           <tr>
              <td>UNIQUESTRING</td>
              <td colspan="3">A</td>
              <td colspan="5">B</td>
              <td colspan="2">A</td>
              <td colspan="2"></td>
              <td>C</td>
              <td></td>
            </tr>
            
Thanks

--
 Bart


------------------------------

Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin) 
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>


Administrivia:

To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.

Back issues are available via anonymous ftp from
ftp://cil-www.oce.orst.edu/pub/perl/old-digests. 

#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.


------------------------------
End of Perl-Users Digest V11 Issue 4210
***************************************


home help back first fref pref prev next nref lref last post