Select Code to Download

use LWP::UserAgent;
         use HTTP::Cookies;
...
         # and then send requests just as you used to do
         $res = $ua->request(HTTP::Request->new(GET => "http://www.yah
+oo.no"));
         print $res->status_line, "\n";