WWW::Mechanize is a subclass of LWP::UserAgent - so can use all of its methods.

You can do something like:

my $agent = WWW::Mechanize->new();
$agent->credentials($uri->host_port, "TheRealm", "user", "pass");
[download]

See LWP::UserAgent for details on credentials.