use LWP::UserAgent; use HTTP::Cookies; $letter1 = "d"; $letter2 = "r"; $letter3 = "f"; $ua = LWP::UserAgent->new; $ua->cookie_jar(HTTP::Cookies->new(file => "lwpcookies.txt", autosave => 1, ignore_discard => 1)); $req = HTTP::Request->new( GET => "http://www.$letter1$letter2$letter3.com" ); print $req->as_string, "\n"; $response = $ua->request($req); print $response->as_string;