From b084add798546652fb027bf76d5a69c9b7fa1ff4 Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Fri, 30 Jun 2017 16:13:29 -0700
Subject: [PATCH] quiet Net::SSLeay warnings

---
 Changes              | 3 +++
 lib/Net/HTTPS/Any.pm | 6 +++++-
 2 files changed, 8 insertions(+), 1 deletion(-)

diff --git a/Changes b/Changes
index 0bb9412..378d12e 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,8 @@
 Revision history for Net-HTTPS-Any
 
+0.13    unreleased
+        - quiet "Use of uninitialized value" warnings from Net::SSLeay
+
 0.12    Wed Aug  3 12:01:08 PDT 2016
         - Get rid of the LWP codepath, now just a simple wrapper for
           Business::OnlinePayment
diff --git a/lib/Net/HTTPS/Any.pm b/lib/Net/HTTPS/Any.pm
index 8224494..e3b51dc 100644
--- a/lib/Net/HTTPS/Any.pm
+++ b/lib/Net/HTTPS/Any.pm
@@ -16,7 +16,7 @@ Net::HTTPS::Any - Simple HTTPS client
 
 =cut
 
-our $VERSION = '0.12';
+our $VERSION = '0.13';
 
 =head1 SYNOPSIS
 
@@ -131,6 +131,8 @@ sub https_get {
     $Net::SSLeay::trace = $opts->{'debug'}
       if exists $opts->{'debug'} && $opts->{'debug'};
 
+    no warnings 'uninitialized';
+
     my( $res_page, $res_code, @res_headers ) =
       get_https( $opts->{'host'},
                  $opts->{'port'},
@@ -224,6 +226,8 @@ sub https_post {
     $Net::SSLeay::trace = $opts->{'debug'}
       if exists $opts->{'debug'} && $opts->{'debug'};
 
+    no warnings 'uninitialized';
+
     my( $res_page, $res_code, @res_headers ) =
       post_https( $opts->{'host'},
                   $opts->{'port'},
-- 
2.11.0