Datem-extention

[Patrick Andrieu]

Hallo Struppi!

Korinthenkakerei:

#!/usr/bin/perl -w
use strict;
use CGI;
print CGI::header(),
CGI::start_html(),
CGI::start_table();

open(DATEI,"<$Name") || die "Konnte Datei nicht öffnen, weil: $!";

^Hier dürfte eine Fehlermeldung kommen oder nichts passieren, weil $Name bisher nicht definiert ist ;)

Und wie erweiterst Du das um die Tabel-Heads (<th>)? Etwa so:
print CGI::Tr( CGI::th(
  [
  User,
  SystemunderTest,
  Release,
  Testcase,
  Startdate,
  Starttime
  ]
  ));

?

Viele Grüße aus Frankfurt/Main,
Patrick