HTTP Zugriffe mit debug/verbose output?

31/07/2008 - 15:05 von Marten Lehmann | Report spam
Hallo,

ich greife auf eine URL per POST zu und das sieht als Script ungefàhr so
aus:

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

my ($agent, $response, $content);

$agent = LWP::UserAgent->new;
$response = $agent->request(POST "https://test/whatever",
["username" => "test",
"password" => "secret"
]);

print $response->content;

Dabei würde ich gerne die rohen Daten sehen, die übertragen werden, also
HTTP Header, HTTP Body unveràndert. Leider finde ich in der
Dokumentation nichts zum debuggen oder verbose output. Wie kommt man da ran?

Tschüß
Marten
 

Lesen sie die antworten

#1 Frank Seitz
31/07/2008 - 15:21 | Warnen spam
Marten Lehmann wrote:

ich greife auf eine URL per POST zu und das sieht als Script ungefàhr so
aus:

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

my ($agent, $response, $content);

$agent = LWP::UserAgent->new;
$response = $agent->request(POST "https://test/whatever",
["username" => "test",
"password" => "secret"
]);

print $response->content;

Dabei würde ich gerne die rohen Daten sehen, die übertragen werden, also
HTTP Header, HTTP Body unveràndert. Leider finde ich in der
Dokumentation nichts zum debuggen oder verbose output. Wie kommt man da ran?



Wenn du das Request-Objekt (Klasse HTTP::Request) selbst konstruierst,
kannst du es mit der Methode as_string() ausgeben.

Grüße
Frank
Dipl.-Inform. Frank Seitz; http://www.fseitz.de/
Anwendungen für Ihr Internet und Intranet
Tel: 04103/180301; Fax: -02; Industriestr. 31, 22880 Wedel

Ähnliche fragen