diff options
| author | Alex Brelsfoard <alex@Alexs-MacBook-Pro.local> | 2015-02-05 19:14:06 -0500 |
|---|---|---|
| committer | Alex Brelsfoard <alex@Alexs-MacBook-Pro.local> | 2015-02-05 19:14:06 -0500 |
| commit | 815272d8c928caa24ca0daa9365d7b9e05b20a94 (patch) | |
| tree | 993865bcf8bd73609ae16105f3331620c3619323 | |
| parent | f0e0e5886b4feb5256e922409ea61522ebba8865 (diff) | |
minor tweaks
| -rw-r--r-- | vSecureProcessing.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/vSecureProcessing.pm b/vSecureProcessing.pm index 69a3ed0..e34e120 100644 --- a/vSecureProcessing.pm +++ b/vSecureProcessing.pm @@ -10,7 +10,7 @@ use MIME::Entity; use Business::OnlinePayment; use Business::OnlinePayment::HTTPS; -use Net::SSLeay qw(post_http post_https make_headers make_form); +#use Net::SSLeay qw(post_http post_https make_headers make_form); use vars qw($VERSION $DEBUG @ISA $me); @ISA = qw(Business::OnlinePayment::HTTPS); @@ -334,7 +334,7 @@ sub submit { Content-Disposition: form-data; name="param" ${xml_data} -----FormBoundaryE19zNvXGzXaLvS5C|; +----FormBoundaryE19zNvXGzXaLvS5C--|; my ( $page, $server_response, %headers ) = $self->https_post( $opts, $content ); # store the server response. |