Opened by esskar at 2006-08-22 11:07
User since
2003-08-04
7321 Artikel
ModeratorIn
2003-08-04
7321 Artikel
ModeratorIn
Hi
hier mein code
user_agent liefert einen LWP::UserAgent zurück.
Die ausgabe ist die folgende:
1: http://domain/path?query&path=%2Ffoo
2: http://domain/path?query&path=
3: http://domain/path?query&path=
natürlich ist das resultat der 2ten $response nicht richtig, weil ja ein falsche Url verwendet wird.
hat jmd eine Idee, wie ich das fixen könnte?
hier mein code
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
my $response = $self->user_agent->get( $url );
return undef unless $response->is_success;
my $form = HTML::Form->parse(
$response->decoded_content,
$url
);
$response = $self->user_agent->request( $form->click );
print STDERR "\n1: ", $url, "\n2: ", $response->base, "\n3: ", $response->request->uri, "\n";
user_agent liefert einen LWP::UserAgent zurück.
Die ausgabe ist die folgende:
1: http://domain/path?query&path=%2Ffoo
2: http://domain/path?query&path=
3: http://domain/path?query&path=
natürlich ist das resultat der 2ten $response nicht richtig, weil ja ein falsche Url verwendet wird.
hat jmd eine Idee, wie ich das fixen könnte?