my $ua = LWP::UserAgent->new()

  my $request = HTTP::Request->new(GET => $cgi_url);

  $request->authorization_basic($username, $password);

  my $response = $ua->request($request);