Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#2

Re: [CGI] Zeile an Datei anhängen

  Alt 14. Jan 2004, 05:39
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:
http://www.luckie-online.de/downloads/.htaccess
AddDescription "dfydsf" Luckie.bmp
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.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat