use LWP::UserAgent;
use HTTP::Cookies;
my $cookies = HTTP::Cookies->new(file =>'./cookies.txt');
my $ua = LWP::UserAgent->new(...);
$ua->cookie_jar($cookies);