$ua = LWP::UserAgent->new();
$req = HTTP::Request->new(POST=> $post_url);
$res = $ua->request($req, 'response_file.dat');