CGI - Hilfe bei einem fast ganzen Skript erbeten

[Wolfgang Bund]

Hallo CGI-Fachleute,

Das Skript soll:

• eine Datenbank (termine.csv) auslesen,
• die Datensaetze nach Datum und Uhrzeit sortieren
• und in eine neue Datei schreiben.

Patchworkonkel an Patchworktante.

Hallo Jutta.
also das Script habe ich nicht kapiert. Aber wenn ich die Aufgabe kapiert habe, dann kann ich Dir helfen.

Aus der Datei termine.csv:

1994;02;05;12;23;Termin Nr. 1 vom 2.5.94 usw.
1997;12;15;06;10;Termin Nr. 2 vom 15.12.97 usw.
1991;05;28;20;23;Termin Nr. 3 vom 28.5.91 usw.

Macht dieses Script:

-----------------------------------------------------------------

#!/usr/local/bin/perl5

Juttas Terminkalender

by Wolfgang Bund ( [e-mail] )

$Termine    = "termine.csv";           # Termine
$Sortiert   = "sortiert.csv";          # Sortierte Termine

Termine einlesen und in einzelne Zeilen zerlegen

@Zeilen = ("");
open(TERMINE, "<$Termine") || die "Datei "+$Termine+" konnte nicht geöffnet werden\n";
  while(<TERMINE>)
   {
     push(@Zeilen, $_);
   }

close(TERMINE);

Zeilen sortieren

@Zeilen = sort(@Zeilen);

Neue Datei anlegen

open(SORTIERT, ">$Sortiert") || die "Datei "+$Sortiert+" konnte nicht angelegt werden\n";

Jede Zeile ausgeben

for(@Zeilen)
  {
     print SORTIERT $_;
  }

close(SORTIERT);

-----------------------------------------

Das da:

1991;05;28;20;23;Termin Nr. 3 vom 28.5.91 usw.
1994;02;05;12;23;Termin Nr. 1 vom 2.5.94 usw.
1997;12;15;06;10;Termin Nr. 2 vom 15.12.97 usw.

Ist vielleicht ein wenig umständlich, aber funktioniert.

Gruß,
Wolfgang