Perl HTTP::Request s IPv6 adresou

Ahoj, snazim se zpristupnit nase sluzby pres IPv6. Jelikoz pouzivame ipvsadm a nad nim ldirectord, tak jsem sel touto cestou. Dokazal jsem sprovoznit testovaci prostredi, ale nejsem s nim spokojen. Dokazu pustit ldirectord ale pouze za pouziti externiho testu.

Co mi nefunguje je check_http(ano v dokumentaci pisou, ze neni podporovan pro IPv6) . Ovsem nevidel jsem duvod, dokud jsem nesnazil upravil ldirectod aby IPv6 pro check_http podporoval. Dospel jsem k jednoduchemu testu, ktery ukazuje co nejde:

#!/usr/bin/perl -w

use Net::INET6Glue::INET_is_INET6;
use LWP::UserAgent;
use Data::Dumper;


my $ua = new LWP::UserAgent();

my $h = new HTTP::Headers("Host" => "ipv6.google.com");

my $req = new HTTP::Request("GET", "http://[2a00:1450:4016:801::1011]:80/", $h);
#my $req = new HTTP::Request("GET", "http://ipv6.google.com:80/", $h);

my $res = $ua->request($req);
print Dumper $res;

Pri pouziti domeny dostanu odpoved, ovsem pri pouziti konkretni adresy dostanu error. :( Jo, prostredi je Debian 6.

Tusite nekdo kde hledat reseni?

Dotaz: Perl HTTP::Request s IPv6 adresou - ldirectord