LWP und POST und Datei Upload

Hallo,

Ich habe folgendes Formular:

<form name = "form1"
encType = "multipart/form-data"
method = "post"
action = "http://tornado:99">
<input name="taskmatch" type="hidden" value="pdfX" />
File to upload:<br>
<input name="AFPDS_Name" size="50" type="file" value="c:\temp\test.afp" />
<input type="submit" value="Submit" />
</form>

Die Daten will ich nun mittels eines Scriptes (nicht CGI) automatisiert
an einen Server schicken der nur die POST Methode versteht.

folgendes habe ich versucht:
my $ua = LWP::Parallel::UserAgent->new();
my $URL='http://localhost';
my $req = POST ($URL, Content_Type=>'multipart/form-data', Content=>[
taskmatch=>'pdfX', FileToImport=>'c:/temp/test.afp' ]);
my $ret=$ua->request($req );
if($ret->is_success) {
...
}

Nur es kommt im HTTP Server nichts an, das sehe ich am Log des Servers.
Ist hier etwas falsch? Wenn ich das Formular über den Browser abschicke
funktioniert es.

Danke,
Reinhard
Reinhard Pagitsch [ Fr, 10 November 2006 09:04 ] [ ID #1531583 ]

Re: LWP und POST und Datei Upload

Reinhard Pagitsch!

Du bist ganz sicher, dass der folgende Unterschied nicht das Problem ist?

> action = "http://tornado:99">
vs.
> my $URL='http://localhost';



Gruß
Daniel
Daniel Fischer [ Fr, 10 November 2006 09:51 ] [ ID #1531584 ]

Re: LWP und POST und Datei Upload

Daniel Fischer wrote:
> Reinhard Pagitsch!
>
> Du bist ganz sicher, dass der folgende Unterschied nicht das Problem ist?
>
>> action = "http://tornado:99">
> vs.
>> my $URL='http://localhost';

Ja, bin ich, der Missmatch ist mir nur in meinem Post hier passiert. In
meinem Script werden die ganzen Parameter von einer Konfig-Datei eingelesen.

Grüße
Reinhard
Reinhard Pagitsch [ Fr, 10 November 2006 10:39 ] [ ID #1531585 ]

Re: LWP und POST und Datei Upload

Daniel Fischer wrote:
> Reinhard Pagitsch!
>
> Du bist ganz sicher, dass der folgende Unterschied nicht das Problem ist?
>
>> action = "http://tornado:99">
> vs.
>> my $URL='http://localhost';
>

Noch was: Ich sehe zwar im Server - Log das Requests kommen aber keine
POST Parameter sowie ich sie sehe wenn das Ganze mit dem Browser sehe.
z.B.
TRACE START: ********** SendResponse Fri, 10 Nov 2006 15:02:01 **********";
TRACE: ConnID="102"";
TRACE: taskmatch="pdfX"";
TRACE: AFPDS_Name="C:\DOCUME~1\reinhard\LOCALS~1\Temp\my35"";
TRACE END: ********** SendResponse Fri, 10 Nov 2006 15:02:01 **********";

Mit dem Script sehe ich nur:
TRACE START: ********** Sending data to OMS Fri, 10 Nov 2006 15:03:30
**********";;
TRACE: ConnID="103"";;
TRACE END: ********** Sending data to OMS Fri, 10 Nov 2006 15:03:30
Fri, 10 Nov 2006 15:03:30 **********";

Grüße,
Reinhard
Reinhard Pagitsch [ Mo, 13 November 2006 11:10 ] [ ID #1534263 ]
Perl » de.comp.lang.perl.misc » LWP und POST und Datei Upload

Vorheriges Thema: use lib auf Webserver
Nächstes Thema: Klasse von Canvas ableiten