RegEx: nur eine bestimmte Anzahl von Ersetzungen pro String - #182348 (Allgemeines zu Perl)

Muffi

2015-09-22 15:54

User since
2012-07-18
1465 Artikel
BenutzerIn
[default_avatar]

Oder

Code (perl): (dl )

1
2
3

my $data = q|...|;
my $anzahl = 3;
$data =~ s/(<td>)/$anzahl-- > 0 ? '<td border-right="1">' : $1/ge;

EDIT: Oder wenns alle bis auf den Letzten sein sollen:

Code (perl): (dl )

$data =~ s/<td>(?=.*<td>)/<td border-right="1">/g;

Last edited: 2015-09-22 15:58:35 +0200 (CEST)

1 + 1 = 10