html stranka pres https

[Vladimír Fux]

Hmm...
Nekolikrat jsem ten tvuj zapis zkontroloval znak po znaku, a na nic jsem
neprisel.
Leda snad, jestli neni nutne zadat jako druhy parametr pro UserAgenta
nejakou emailovou adresu. Stezuje si na options. Ja jsem nezkoumal jestli
je to podminka, jednoduse jsem si ji tam dal.

Kdyz neco chybi, obvykle to skonci hlasenim Can`t  locate object method.....

Vladimir

> require LWP::UserAgent;
> require HTTP::Request;
> $ua = new LWP::UserAgent('Mozilla/4.0 (compatible; MSIE 5.0; Windows 98;
DigExt)','');
> my
>
$qstring="https://klient3.ebanka.cz/ebts/owa/shop.getpayments?shopname=LINUX
&password=mujpassworda&creditaccount=519375001&creditbank=2400&&showaccname=
Y";
> my $req = HTTP::Request->new(GET => $qstring);
> print "req=$req ";
> my $response = $ua->request($req);
> print "response=$response ";
> my $vypis=$response->content;
> print "vypis=$vypis\n";
>
> a vysledek:
> nrecognized LWP::UserAgent options: Mozilla/4.0 (compatible; MSIE 5.0;
> Windows 98; DigExt) at n3.pl line 32
> req=HTTP::Request=HASH(0x81ecc30) response=HTTP::Response=HASH(0x833a288)
vypis=
>
> fakt nevim - schazi mi nejake knihovny? Nic to nehlasi, a  predpokladam,
> ze kdyby neco chybelo, tak se perl ozve, aspon tak zatim jsem na to
> zvykly. Ale ted to jenom tise projde.
>
> Diky za dalsi namety
>
> --
> Ondrej Koala Vacha