import Net::SSLeay qw(get_https make_headers);
my $headers = make_headers(%headers);
- $Net::SSLeay::trace = $opts->{'debug'} if exists $opts->{'debug'};
+ $Net::SSLeay::trace = $opts->{'debug'}
+ if exists $opts->{'debug'} && $opts->{'debug'};
my( $res_page, $res_code, @res_headers ) =
get_https( $opts->{'host'},
my $raw_data = ref($post_data) ? make_form(%$post_data) : $post_data;
- $Net::SSLeay::trace = $opts->{'debug'} if exists $opts->{'debug'};
+ $Net::SSLeay::trace = $opts->{'debug'}
+ if exists $opts->{'debug'} && $opts->{'debug'};
my( $res_page, $res_code, @res_headers ) =
post_https( $opts->{'host'},