CGI/PERL: Liste ausgeben in Browser

[CK1]

Hi,

tja, cole [:-)] is net alles

PROBLEM ERKANNT: NEIN GENAU DAS NICHT!
Ich will diesen part n mal wiederhohlen, (das ersetzten) des
original textes

Naja, das geht auch so aehnlich, nur leicht modifiziert. Ich gehe mal
davon aus, dass die Platzhalter untereinander stehen.

zunaechst: wo ist der erste Platzhalter?

for($i=0;$i<=$#geruesst;$i++)
{
break if index($geruesst[$i],"<!-- PLATZHALTER1 -->") <> -1;
}

my $stelle = $i;

for ($i=0;$i<=72;$i++)
{
for($j=0;$j<=6;$j++)
  {
  print $geruesst[$stelle + $j];
  print $datensaetze[$i][$j];
  }
}

Wenn sie nicht untereinander stehen, musst du halt mit jedem
Schleifen-Durchlauf das gesamte Geruesst durchgehen und die Stellen
ausgeben, wo Platzhalter stehen:

@platzhalter = ("<!-- PLATZHALTER1 -->","<!-- PLATZHALTER2 -->",...);

for ($i=0;$i<=72;$i++)
{
for($j=0;$j<=6;$j++)
  {
  foreach (@geruesst)
   {
   foreach $platz (@platzhalter)
    {
    print $_ if index($_, $platz) <> -1;
    }
   }

print $datensaetze[$i][$j];
  }
}

Das gibt immer genau die Teile wieder aus, in dem die Platzhalter
stehen.

mfg
CK1

P. S.: *g* das Programm wird ziehmlich verschachtelt...