use LWP::UserAgent; use Data::Dumper; my $ua = new LWP::UserAgent; $ua->agent(\"AgentName/0.1 \" . $ua->agent); my $req = new HTTP::Request POST => \'http://ex
my $ua = LWP::UserAgent->new(); my $request = POST( $url, [ 'port' => 8, 'target' => 64 ] ); my $content = $ua->request($request)->as_string();