+ my $res;
+ if ( ref($post_data) ) {
+ $res = $ua->request( POST( $url, [%$post_data] ) );
+ }
+ else {
+ my $req = new HTTP::Request( 'POST' => $url );
+ $req->content_type( $opts->{"Content-Type"} );
+ $req->content($post_data);
+ $res = $ua->request($req);
+ }
+
+ my @res_headers = map { $_ => $res->header($_) }
+ $res->header_field_names;
+
+ $self->response_page( $res->content );
+ $self->response_code( $res->code. ' '. $res->message );
+ $self->response_headers( { @res_headers } );
+
+ ( $res->content, $res->code. ' '. $res->message, @res_headers );
+
+ } else {
+ die "unknown SSL module $ssl_module";
+ }