My understanding is that get_basic_credentials() is for Basic Authentication?

And for Digest Authentication one needs to use credentials per the example at LWPTut#HTTP_Authentication?

It applies to digest as well. I use the following in one of my programs for a site that uses digest:

sub get_basic_credentials {
   my ($self, $realm, $uri, $isproxy) = @_;
   if (  !$isproxy
      && $realm eq 'example'
      && $uri->host_port() =~ /(^|\.)example\.com:80\z/i
   ) {
      return ($self->{user}, $self->{passwd});
   }

   return $self->SUPER::get_basic_credentials($realm, $uri, $isproxy);
}
[download]

credentials populates a hash which the base get_basic_credentials accesses. That's fine for most uses. If it isn't, overridding get_basic_credentials gives extra flexibility. In my case, the realm is fixed, but there's an unlimited number of subdomains being accessed.

In my case, the realm is fixed,

What you appear to be suggesting is that I should parse the realm out of the 401 manually and then supply it back to LWP via a calback?

---

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."

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."