Hallo,

ich möchte ein Script erstellen,das eine Datei von einem FLASH Script entgegen nimmt.
Da ich für das input field keinen Namen (bzw. der FLASh entwickler nicht weiss, welchen name flash da vergibt, egal), habe schreibe ich

my $q = CGI->new();

my @files = $q->upload();
...

Laut doku sollte dann ein Array mit filehandles zurückgegeben werden, @files ist aber leer.

Mit Angabe von
$file = $q->upload('uplname') ; # von einem testscript aus
funktioniert alles.

Was läuft falsch ?

Rolf

Naja, die upload-Funktion von CGI kann ja auch nicht zaubern. Die erwartet als Parameter den Namen des Feldes, wo der oder die Dateinamen übergeben werden.

Du könntest dir aber mal mit Hilfe von param() die ans CGI übermittelten Felder ansehen. Da findest du sicherlich dann auch das, in dem der Dateiname steckt.

nepos+2008-09-18 08:49:40--

Naja, die upload-Funktion von CGI kann ja auch nicht zaubern. Die erwartet als Parameter den Namen des Feldes, wo der oder die Dateinamen übergeben werden.

Du könntest dir aber mal mit Hilfe von param() die ans CGI übermittelten Felder ansehen. Da findest du sicherlich dann auch das, in dem der Dateiname steckt.

Doch , sollte sie können, zumindest interpretiere ich die Doku entsprechen. Dort steht:

------------------
When called with the name of an upload field, upload() returns a filehandle,
or undef if the parameter is not a valid filehandle.

.. .

In an list context, upload() will return an array of filehandles. This
makes it possible to create forms that use the same name for multiple
upload fields.
------------------
Ich hatte das zuvor mit Apache2::Upload versucht, da funktioniert es (d.h. ein Upload-Filehandle zu bekommen ohne den Namen des Uploads zu kennen), nur konnte ich da bislang die maximale Upload-Größe nicht auf 200MB erhöhen, deshalb (unter anderem) versuche ich das nun mit CGI.
Und die Doku hier habe ich daher auch so verstanden, dass upload() eine Liste aller vorhandenen upload zurück gibt, tit es aber wohl nicht.
Ich werde das jetzt alle param() durchprobieren...

rolf


Rolf

Ich glaube nicht, daß mit Listenkontext auch eine leere Liste gemeint ist.

RalphFFM+2008-09-18 10:20:34--

Ich glaube nicht, daß mit Listenkontext auch eine leere Liste gemeint ist.

also, das Problem habe ich jetzt gelöst indem ich einfach alle param durchteste. Aber weil es mich interessiert habe ich mal in den source gesehen und demnach sollte es gehen, den upload() macht nichts anderes als :

sub upload {
my($self,$param_name) = self_or_default(@_);
my @param = grep(ref && defined(fileno($_)), $self->param($param_name));
return unless @param;
return wantarray ? @param : $param[0];
}

und $self->param(undef) liefert ja alle parameter zurück.
Und in parse() wird read_multipart() aufgerufen, das wiederum macht irgendwann:
push(@{$self->{$param}},$filehandle);

rolf

Quote

und $self->param(undef) liefert ja alle parameter zurück.

Es gibt einen Unterschied zwischen foo(undef) und foo().
Ersteres ist eine Parameterliste mit einem Parameter, der undef ist. Letzteres ist eine leere Parameterliste.

Gast+2008-09-18 10:39:56--

und $self->param(undef) liefert ja alle parameter zurück.

Wer behauptet das?



Test:

RalphFFM+2008-09-18 10:20:34--

Ich glaube nicht, daß mit Listenkontext auch eine leere Liste gemeint ist.

Verstehe ich das richtig so, dass Du sagst, dass my @files = $q->upload(); kein Listenkontext fuer upload ist, weil @files leer ist? Das ist imho nicht richtig. Zuweisung an ein Array erzeugt immer Listenkontext.

Das war so gemeint, daß ich kaum glauben konnte, daß @files = $q->upload() alle Uploadfeldnamen zurückliefert. Werktagsüber habe ich bei etlichen Dingen leider nicht die Möglichkeit zum Ausprobieren.