Opened by rosti at 2011-03-21 18:51
User since
2011-03-19
3472 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
2011-03-19
3472 Artikel
BenutzerIn
hi topeg, danke!!!
mittlerweile war ich auch nicht faul und habe erfolgreich getestet:
Wieder Einiges dazugelernt. Auch zu HTTP, TE, Transfer-Encoding, Content-Encoding...
Mein Net::HTTP10 kann in die Schublade, so schnell kanns gehen ;)
Den produktiven Zuschlag kriegt: LWP und co.
Viele Grüße an Alle,
Rolf
mittlerweile war ich auch nicht faul und habe erfolgreich getestet:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
use strict;
use LWP::UserAgent;
use HTTP::Request;
my $ua = LWP::UserAgent->new;
my $request = HTTP::Request->new('GET', 'http://rolfrost.de/cgi-bin/100.cgi');
$ua->request($request, \&callback, 4);
sub callback{
printf "%u\n", unpack "N", shift;
}
Wieder Einiges dazugelernt. Auch zu HTTP, TE, Transfer-Encoding, Content-Encoding...
Mein Net::HTTP10 kann in die Schublade, so schnell kanns gehen ;)
Den produktiven Zuschlag kriegt: LWP und co.
Viele Grüße an Alle,
Rolf