bilder sortieren die 2. - #80289 (Allgemeines zu Perl)

misuzu

2004-02-23 16:27

User since
2004-02-17
16 Artikel
BenutzerIn
[default_avatar]

hi zusammen,

da ich bei meinem letzten post zahlreiche tipps bekommen habe // danke erstmals

mein diesmaliges anliegen ist:

ich holle mir via chdir bilder aus ordnern.
soweit so gut.

jetzt möchte aber die ausgabe doch via tabelle formatieren.

der bisherrige vorgang :

Code: (dl )

chdir("img/db/$result[1]/mn");

my(@bilder);

push (@bilder, glob "*.jpg");
push (@bilder, glob "*.gif");


my $chk = 1;
foreach my $bild (@bilder) {
 print qq~<p class="dir-text"><img src="img/db/$result[1]/mn/$bild"></p>~;
 print "<br>" if $chk < 0; 
 $chk = - $chk;
}

jetzt würde ich gerne aber 2 bilder pro zeile ausgeben lassen:

bsp:

Code: (dl )

              <tr> 
                <td> bild1 </td>
                <td> bild2 </td>
              </tr>

so dass die schleife jeweils -wie nötig -die zeillen einrichtet auch bei ungerader bilderanzahl

wäre über tipps oder vorschläge dankbar

schönen tag noch

misuzu