nicht angemeldet
Hi,
ich habe folgenden Code:
#!"\xammp\perl\bin\perl.exe" -w
use CGI::Carp qw(fatalsToBrowser);
use POSIX qw(ceil floor);
$pics_nr = 105;
$pics_seiten = ceil($pics_nr/16);
$pics_count = 0;
$pics_name = 1;
$pics_break = 1;
$page_name = 1;
foreach ($pics_seiten) {
open($page_name,">$page_name.html") || die("FEHLER: Datei kann nicht geschrieben werden...");
print $page_name "Content-type: text/html\n\n";
print $page_name "<html><body>";
print $page_name "<center><table>";
print $page_name "<tr>";
while ($pics_count <= 16) {
if ($pics_breack == 1) {print $page_name "<tr>"}
$pics_count++;
print $page_name "<td><img src="img/$page_name.jpg" /></td>";
$pics_name++;
if ($pics_break == 4) {print $page_name "</tr><tr>"; pics_break = 1;};
$pics_brack++;
}
if ($pics_break != 4) {print $page_name "</tr>"; pics_break = 1;};
print $page_name "</table></center>";
print $page_name "</html></body>";
close($page_name);
$page_name++;
$page_count = 1;
}
in dem Skalar $pics_nr habe ich gespeichert wieviele Bilder im Ordner img sind (ich weiß, das es besser wäre, wenn ich den Ordner auslese, aber soweit bin ich leider noch nicht). In dem Skalar sage ich, wieviele Seiten erstelle werden sollen und wieviele Bilder eine Seite haben soll. Die restlichen Skalare sind zum Zählen da.
Der Code soll eine HTML-Setie erzeugen, die eine Zentrierte Tabelle enthält (bitte jetzt keine Diskussion darüber, das <div>-Tags eleganter wären). Jede Zeile dieser Tabelle soll 4 Zellen mit einem Bild enthalten.
Ich hoffe das Prinzip des Codes ist verständlich. Wenn nicht, einfach nachfragen ;)
Wenn ich diese Datei jetzt ausführe, dann wird mir folgende Fehlermeldung im Brwoser ausgegeben:
Serverfehler!
Die Anfrage kann nicht beantwortet werden, da im Server ein interner Fehler aufgetreten ist.
Fehlermeldung:
couldn't create child process: 720003: pic.cgi
Sofern Sie dies für eine Fehlfunktion des Servers halten, informieren Sie bitte den Webmaster hierüber.
Error 500
127\.0.0.1
07/09/08 07:30:23
Apache/2.2.8 (Win32) DAV/2 mod_ssl/2.2.8 OpenSSL/0.9.8g mod_autoindex_color PHP/5.2.5
Das Perl Modul ist korrekt installiert und Funktioniert auch. Also daran kanns nicht liegen.
Vielen dank schonmal im Vorraus
Søren
Struppi