Help for this page

Select Code to Download

Select or download this

sub send_receive {
    .
...
    my $http_endpoint = qq[http://$host:$port$endpoint];
    my $ua = LWP::UserAgent->new();
    my $post = HTTP::Request->new('POST', $http_endpoint, ...