Hallo !
Ich habe mir gerade aus der Forumsauslese das Script zum Datei-Upload mit Hilfe von Perl kopiert, welches auch funktioniert.
Allerdings habe ich noch ein bis zwei Verständnisfragen.
Hier erstmal das Script:
#!/usr/bin/perl
binmode STDIN;
read STDIN, $Daten, $ENV{'CONTENT_LENGTH'};
@Teile = split /-----------------------------.{9}/, $Daten;
@Datei = split /\n/, $Teile[1], 5;
while ($Datei[1] =~ /\/) { $Datei[1] =~ s/^.*\//; }
$Datei[1] =~ s/"//;
chop $Datei[1];
chop $Datei[4]; chop $Datei[4];
open DATEI, ">$Datei[1]";
binmode DATEI;
print DATEI $Datei[4];
close DATEI;
print "Content-type: text/html\n\nUpload vollständig!";
Wenn ich also das Formular starte und eine Datei browse, z.B eine doc-Datei und den Datenstrom, der übergeben wird mir anzeigen lasse, sieht das so aus:
-----------------------------294882128732558 Content-Disposition: form-data; name="Datei";
filename="M:\DATA\Schmalacker\Sampler7.doc" Content-Type: application/msword
ÐÏࡱáÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ
Frage 1: Woher kommen die Striche am Anfang und was sagt die Nummernfolge aus ?
Danke
Frank