Globale Suche - #85009 (Allgemeines zu Perl)

esskar

2004-07-27 19:26

User since
2003-08-04
7321 Artikel
ModeratorIn

user image

Code: (dl )

1
2
3

while (1) {
$text =~ s/suchen/ersetzen/;
}

ist wohl lansgamer; wenn du durchnummerieren willst, kannst du ja mal folgendes testen; (habs nicht ausprobiert)

Code: (dl )

use strict;

my $text = "ich ich ich ich ich ich";
my $c = 0;
my $du = "du";

$text =~ s!ich!$c++.$du!ge;

print $text;

PS: ishka war schneller :)\n\n