String mehrfach per regex verändern - #157128 (Allgemeines zu Perl)

FIFO

2012-03-30 18:22

User since
2005-06-01
469 Artikel
BenutzerIn

user image

2012-03-30T15:34:12 hlubenow
Code (perl): (dl )
my @a = split(" ", $str);

Das verändert aber den String, wenn mehrere Leerzeichen aufeinander folgen. Besser split(/ /, $str);.
Und das schöne am Iterieren über arrays in Perl ist ja das Alias-Verhalten der Schleifenvariable:

Code (perl): (dl )

for my $elem (@a) {
    if ($elem =~ m{\A \d+ \z}x && $elem > 15) {
        $elem++;
    }
}

... finde ich lesbarer als die Index-Variante.

Gruß FIFO

Everyone knows that debugging is twice as hard as writing a program in the first place. So if you're as clever as you can be when you write it, how will you ever debug it? -- Brian Kernighan: "The Elements of Programming Style"