Select Code to Download

use LWP::UserAgent;
use HTTP::Request::Common qw(POST);
...

BEGIN { $LWP::DebugFile::outname = 'c:/ua_debug.txt' }
use LWP::DebugFile qw(+);

#create cookies jar to hold the cookies for this user agent
my $cookie_jar = HTTP::Cookies->new(
...
                                    autosave => 1,

                                   );

#create cookies jar to hold the cookies for this user agent
 my $cookie_jar = HTTP::Cookies::Microsoft->new(
...
          }

}