Codebase list libcrypt-ssleay-perl / a697b01
import Crypt-SSLeay 0.53_04 from CPAN git-cpan-module: Crypt-SSLeay git-cpan-version: 0.53_04 git-cpan-authorid: DLAND git-cpan-file: authors/id/D/DL/DLAND/Crypt-SSLeay-0.53_04.tar.gz David Landgren authored 17 years ago Michael G. Schwern committed 14 years ago
5 changed file(s) with 25 addition(s) and 8 deletion(s). Raw diff Collapse all Expand all
00 Revision history for Crypt-SSLeay
11 =================================
22
3 0.53_03
3 0.53_04 2007-03-06 09:39:01 UTC
4
5 - add diag() info to determine possible reasons for failure as per
6 http://www.nntp.perl.org/group/perl.cpan.testers/2007/03/msg428964.html
7
8 0.53_03 2007-03-04
49
510 - Adjusted the typemap shims to silence the compiler warnings that
611 occur when sizeof(IV) is larger than sizeof(char *).
00 --- #YAML:1.0
11 name: Crypt-SSLeay
2 version: 0.53_03
2 version: 0.53_04
33 abstract: OpenSSL support for LWP
44 license: perl
5 generated_by: ExtUtils::MakeMaker version 6.32
5 generated_by: ExtUtils::MakeMaker version 6.31
66 distribution_type: module
77 requires:
88 meta-spec:
246246 );
247247
248248 if (open OUT, '> test.config') {
249 print OUT <<INFO;
250 ssl $pkg_config->{type} $pkg_config->{ver} in $SSL_DIR
251 lib @LIB_FLAGS
252 inc @INC_FLAGS
253 INFO
254
249255 print <<INFO;
250256 The test suite can attempt to connect to public servers
251257 to ensure that the code is working properly. If you are
11
22 use strict;
33 use vars '$VERSION';
4 $VERSION = '0.53_03';
4 $VERSION = '0.53_04';
55
66 eval {
77 require XSLoader;
5757
5858 =head1 DESCRIPTION
5959
60 This document describes C<Crypt::SSLeay> version 0.53_03, released
61 2007-xx-xx.
60 This document describes C<Crypt::SSLeay> version 0.53_04, released
61 2007-03-06
6262
6363 This perl module provides support for the https protocol under LWP,
6464 to allow an C<LWP::UserAgent> object to perform GET, HEAD and POST
1818
1919 my $network_tests;
2020 if (open IN, '<test.config') {
21 diag("config");
2122 while (<IN>) {
2223 chomp;
23 if (my ($key, $value) = ($_ =~ /\A(\S+)\s+(\d+)/)) {
24 $network_tests = $value if $key eq 'network_tests';
24 if (my ($key, $value) = ($_ =~ /\A(\S+)\s+(.*)/)) {
25 if ($key eq 'network_tests') {
26 $network_tests = $value;
27 }
28 elsif (grep {$key eq $_} qw(inc lib ssl)) {
29 diag("$key $value");
30 }
2531 }
2632 }
2733 close IN;