So, habe es jetzt soweit. Mit:
Code:
my $databasefile = 'http://www.luckie-online.de/'.$dir.'/.htaccess';
my $newline = 'AddDescription "'.$comment.'" '.$filename;
#open(FILE, "$databasefile") || die Can't locate database file $!;
#print FILE "\n$newline";
#close(FILE);
print "Content-Type: text/
html\n\n";
print "<head><title>Homepage von Michael Puff - Datei-Uploadbestätigung</title></head>";
print "<
html><body>";
print "<h1>Datei-Uploadbestätigung</h1>";
print "<hr>";
print $databasefile."
";
print $newline."
";
Gibt er mir aus:
Zitat:
Aber so bald ich diese Zeile
Code:
open(FILE, "$databasefile") || die Can't locate database file $!;
Mit reinnehme kommt der Serverfehler, obwohl der Pfad doch stimmt.