Laut Doku sollte LWP::UserAgent mit der Methode credentials() (oder direkt mit dem Callback get_basic_credentials()) genau das machen.