Wie kann ich das generieren von HTML-Tabellen in Perl?

Brauche ich zum erstellen einer 2-Tabellen im HTML-format. Jeder hat 5 Zeilen:

1. Tabelle

  • 1. Reihe hat FRÜCHTE in ihm, besetzen alle Spalten
  • 2. Reihe hat im Januar(Monat), besetzen alle Spalten
  • 3. Reihe hat Namen von etwa 6 Früchten (Apfel, orange, Trauben,...), die Diese Namen nicht ändern. also diese Zeile hat 6 Spalten
  • 4. Reihe hat die Preise für jede Frucht ( 10,20,30..) also das hat 6 Spalten.
  • 5. Reihe hat entsprechende Meldung für jede Frucht, die zeigen, wie Verfügbar ist oder nicht.

2. Tabelle

Wenn es verfügbar ist, wird die Hintergrundfarbe für die Zelle soll grün sein und wenn nicht ROT.

  • 1. Reihe hat GEMÜSE drin, besetzen alle Spalten
  • 2. Reihe hat mit Februar(Monat), besetzen alle Spalten
  • 3. Reihe hat Namen von einigen 6 Gemüse (Tomaten, Kartoffeln..)Diese Namen nicht ändern. also diese Zeile hat 6 Spalten
  • 4. Reihe hat Tarife für jedes Gemüse ( 10,20,30..) also das hat 6 Spalten.
  • 5. Reihe hat entsprechende Meldung für jedes Gemüse, die zeigen, wie Verfügbar ist oder nicht.Wenn es verfügbar ist, wird die Hintergrundfarbe für die Zelle soll grün sein und wenn nicht ROT.

Alle diese Daten Lesen aus einer Datei mit einem bestimmten format, es ist

<name des Obst - /Gemüse - > Preis <oder nicht>

Die Namen von Obst und Gemüse ändern sich nicht , es werden die gleichen für beide Tabellen.
Jedoch, es könnte möglich sein, dass die Daten für ein bestimmtes Obst/Gemüse ist nicht vorhanden.
wenn es nicht vorhanden, wird die der Spalte, die zeigen sollten N/A mit weißem hintergrund.

Kann ich nicht verwenden MIME:Lite für diese.
Verwenden müssen print <<ENDHTML;

InformationsquelleAutor anon | 2010-03-19
Schreibe einen Kommentar