1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
use LWP::UserAgent;
my $ua = new LWP::UserAgent;
$ua->agent("lustiger Browser");
my $request = new HTTP::Request GET => $url;
my $response = $ua->request($request);
if ($response->is_success) {
#print $response->content; # funktioniert, ich will aber keine Ausgabe..
my $html = $response->content; # warum steht in $html nicht der content?
$status = "ok";
}
else {
$status = "Error: ". $response->status_line;
}
return ($status,$html);
Warum steht in $html nicht der content wie er auch ausgegeben wird beim print Aufruf? Liefert $response->content keinen String?\n\n
<!--EDIT|kölsch|1078841786-->