perl basic-авторизация username

[Andrey Aleksandrov]

Добрый день!

Подскажите как получить username (из какой переменной) в perl-овом
модуле, после HTTP Basic-авторизации?