in reply to Re^3: LWP and Digest Authentication
in thread LWP and Digest Authentication

In your example, did you call credentials() also?


Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.
"Too many [] have been sedated by an oppressive environment of political correctness and risk aversion."

Replies are listed 'Best First'.
Re^5: LWP and Digest Authentication
by ikegami (Patriarch) on Feb 11, 2009 at 03:49 UTC
    No. Notice I don't call the base class's get_basic_credentials for the domain of interest, so the info I would feed to credentials would never get used.
        I also overloaded the constructor.
        sub new { my ($class, %options) = @_; my $user = delete $options{user}; my $passwd = delete $options{passwd}; ... my $self = $class->SUPER::new(%options); $self->{user} = $user; $self->{passwd} = $passwd; ... return $self; }