File Upload auf webserver

Scaleo · 16.01.2007

habe ein perl skribt das ich aber in shell bracuh kann mir des jemand anpassen danke.

#!/usr/bin/perl -w

use CGI;

$upload_dir = "/files";

$query = new CGI;

$filename = $query->param("photo");

$filename =~ s/.*[\/\\](.*)/$1/;
$upload_filehandle = $query->upload("photo");

open UPLOADFILE, ">$upload_dir/$filename";

binmode UPLOADFILE;

while ( <$upload_filehandle> )
{
print UPLOADFILE;
}

close UPLOADFILE;

print $query->header ( );
print <<END_HTML;

<HTML>
<HEAD>
<TITLE>Datei ist am Server</TITLE>
</HEAD>

<BODY>
Die Datei liegt nun auf dem Server
</BODY>
</HTML>

END_HTML

Wäre net danke

Wolfgang · 16.01.2007

Hallo
Wo liegt dein Problem, was verstehst du nicht?
Dieses Script ist ein webbasiertes perl-script, und für die Shell ungeeignet.
Wir sind hier aber keine Scriptfabrik, sondern helfen nur bei Problemen die Leute haben, wenn sie sich damit befassen.
Du wirst dich also selbst damit befassen müssen.
IMHO wirst du (wenn du die Boardsuche nutzt) auch Beispiele zu deinem Problem finden.

Gruß Wolfgang

File Upload auf webserver

Scaleo

Wolfgang

Foren Gott

Ähnliche Themen

Server und Client für TCP und UDP

ca. 1200 PDF-Dateien auslesen und bestimmte Daten in eine CSV-Datei speichern

perl script, das Dateien aus einer Liste löscht

Samba 4 Gast Zugang unter Ubuntu funktioniert nicht

perl: curl sendet basic anstatt ntlm

Neueste Themen