LWP::Simpleモジュールでは無理なので。
use LWP::Simple; my $url = "http://www.yahoo.co.jp/"; my $htmlstr = get($url);
から
use LWP::UserAgent; my $ua = LWP::UserAgent->new; my $url = "http://www.yahoo.co.jp/"; my $req = HTTP::Request->new(GET => $url); $req->authorization_basic('user', 'passwd'); # 基本認証のアカウント指定 my $htmlstr = $ua->request($req)->content;
のように書き換えてうまくいった。