Хорошая документация c примерами по LWP::UserAgent

Где можно найти хорошую документацию c примерами по LWP::UserAgent. На кпане там описание и мне не совчем понятно как нпаример сохрнать куки. Лигнюсь на форум, получаю сообщение что удачно залогинился и сейчас буду перемещен на страницу. При дальнейших попытказ работы с форумом выдается сообщение что я не залогинен.

    my $cookie = HTTP::Cookies->new ( );
    $agent = LWP::UserAgent-> new ( );
    $agent->agent("Opera");

    my $url = "http://diesel.elcat.kg/index.php";;
    $cookie = $agent-> cookie_jar( );
    my $response = $agent->post ( $url,
        [
            'act' => 'Login',
            'CODE' => '01',
            'referer' => '...',
            'UserName' => '...',
            'PassWord' => '...',
        ],
    );
    die "Can't get $url -- ", $response->status_line unless $response->is_success;

    print ( Convert::Cyrillic::cstocs ( $src, $dst, $response->content));
    my $q;
    $q = $1 if ($response->content =~ m/s=(\w*);?\ ?/g);
    print ( "\n>>>".$q."<<<\n");

    $response = $agent->get ( $url,
        [
            s => $q,
        ],
    );
    die "Can't get $url -- ", $response->status_line unless $response->is_success;


    print ( Convert::Cyrillic::cstocs ( $src, $dst, $response->content));