anf_frage: Variablen-Interpolation in RegEx

15/01/2008 - 22:52 von Theo Pilz | Report spam
Hallo zusammen,

die gewünschten Dateien (AUSG) werden richtig angelegt (b1.shtml -
b7.shtml). In den Zeilen 34 und 36 wird aber $nr nur mit dem Wert "1"
berücksichtigt. Vielleicht kann jemand einem Anfànger helfen?

my $nr = 1;
my $zahl = 7;
while ( $nr <= $zahl ) {
$rueck = $nr - 1;
$vor = $nr + 1;
$zeilen[34] =~ s/xxx01ueb/$nr\. &Uuml;berschrift/;
$zeilen[36] =~ s/xxx02rueck/b$rueck/;
$zeilen[36] =~ s/xxx03weit/b$vor/;

open AUSG, "> b$nr.shtml";
select AUSG;
print "@zeilen";
close AUSG;
$nr += 1;
}

Danke

mfG

Theo
 

Lesen sie die antworten

#1 Frank Seitz
15/01/2008 - 23:01 | Warnen spam
Theo Pilz wrote:

die gewünschten Dateien (AUSG) werden richtig angelegt (b1.shtml -
b7.shtml). In den Zeilen 34 und 36 wird aber $nr nur mit dem Wert "1"
berücksichtigt. Vielleicht kann jemand einem Anfànger helfen?

my $nr = 1;
my $zahl = 7;
while ( $nr <= $zahl ) {
$rueck = $nr - 1;
$vor = $nr + 1;
$zeilen[34] =~ s/xxx01ueb/$nr\. &Uuml;berschrift/;
$zeilen[36] =~ s/xxx02rueck/b$rueck/;
$zeilen[36] =~ s/xxx03weit/b$vor/;

open AUSG, "> b$nr.shtml";
select AUSG;
print "@zeilen";
close AUSG;
$nr += 1;
}



Wenn du einmal den Wert ersetzt hast, kannst du ihn in
der nàchsten Interation natürlich nicht nochmal ersetzen.

Grüße
Frank
Dipl.-Inform. Frank Seitz; http://www.fseitz.de/
Anwendungen für Ihr Internet und Intranet
Tel: 04103/180301; Fax: -02; Industriestr. 31, 22880 Wedel

Ähnliche fragen