use LWP::Simple qw(get $ua);
use HTTP::Cookies;
$jar = HTTP::Cookies->new;
... do other things with $jar ...
$ua->cookie_jar($jar);
...
$result = get $url;