Thread LWP::UserAgent (Syntax): - wie lade ich eine Datei über POST - (7 answers)
Opened by suliko at 2006-06-23 14:51

suliko
 2006-06-23 14:51
#8104 #8104
User since
2006-04-26
23 Artikel
BenutzerIn
[default_avatar]
Hallo,

ich habe ein Gerät-X, das sich über eine Datei konfigurieren lässt. Das Gerät bietet eine HTML-GUI und über die kann man die Konfigurationsdatei hochladen. Ich kenne die IP-Nummer vom Gerät + die Struktur von der Konfigurationsdatei.

In meinem Fall möchte ich diese Web-GUI umgehen und die Konfigurationdatei über ein Skript abschicken.

Dies hier habe ich gebastelt:

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
#!c:/perl/bin/Perl.exe

use CGI::Carp "fatalsToBrowser";
use strict;

use LWP::UserAgent;
use HTTP::Request::Common;

my $ua = LWP::UserAgent->new();

my $resp = $ua->request(POST 'http://192.168.0.248/cfg.html',

Content_Type => 'form-data',

'SID' => 'xy00',

'id' => '56069145',

'file' => ["C:\Dokumente und Einstellungen\user\Desktop\myConfigFile.xml"]);

my $content = $resp->content;

print <<HTML;
Content-type: text/html

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">

<body>

$content

</body>

</html>

HTML


Irgendwie funktioniert das ganze nicht... es kommt sogar eine Fehlermeldung vom Server:

Quote
500 Server closed connection without sending any data back


Was ist falsch?

Danke für Tipps!
:::bona mente:::

View full thread LWP::UserAgent (Syntax): - wie lade ich eine Datei über POST -