Re: Newbie question

[David A. Desrosiers]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1


> <ObSitescooperMention>
>
> But sitescooper, http://sitescooper.org/ - can do cookies.
>
> sitescooper has a plucker backend, that uses the python tools.
>
> </ObSitescooperMention>

        Pulling cookies in with perl is actually really easy (as well as
SSL-based logins, etc. using sessions and cookies)

__BEGIN__

        $ua->cookie_jar(HTTP::Cookies->new(file => "<cookie_file",
                        autosave => 1));
        $ua->timeout(300);

        my $req = POST 'https://www.domain.com/login.cgi',
                        [client_sessid   =>$$secinfo{USERID},
                         pw    =>$$secinfo{PWD},
                        ];

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

        unless ($res->is_success) {
                print "Login Failed: : ". $res->status_line . "\n";
                return 0;
        }

        my @urls = qw(<list_of_required_urls>);
        foreach my $url(@urls) {
                my $req = HTTP::Request->new(GET=>$url);
                my $res = $ua->request($req);
                unless ($res->is_success) {
                        return 0;
                }
        }
__END__

        ..you get the idea. It's easy to support.


d.

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.0.7 (GNU/Linux)

iD8DBQE9ClxzkRQERnB1rkoRAjnsAJ4zj56MD5Ri8aKbQrBND5R2PT31nwCeONI3
f8kQUUEUj78haYmG+uHsabs=
=EJpp
-----END PGP SIGNATURE-----