Net-SMTP-SSL-1.03/000755 000767 000024 00000000000 12541415310 013504 5ustar00rjbsstaff000000 000000 Net-SMTP-SSL-1.03/Changes000644 000767 000024 00000000307 12541415056 015006 0ustar00rjbsstaff000000 000000 1.03 2015-06-20 - $net_smtp_ssl->isa('Net::SMTP') is now true 1.02 2015-03-26 - make it work again under blead; thanks to Zefram for the patch 1.01 2004-07-19 - Initial Revision. Net-SMTP-SSL-1.03/lib/000755 000767 000024 00000000000 12541415310 014252 5ustar00rjbsstaff000000 000000 Net-SMTP-SSL-1.03/Makefile.PL000644 000767 000024 00000000637 12505101102 015453 0ustar00rjbsstaff000000 000000 use strict; use ExtUtils::MakeMaker; WriteMakefile ( AUTHOR => 'Casey West ', ABSTRACT => "SSL support for Net::SMTP", NAME => 'Net::SMTP::SSL', PREREQ_PM => { 'Test::More' => '0.47', 'Net::SMTP' => '0', 'IO::Socket::SSL' => '0', }, VERSION_FROM => 'lib/Net/SMTP/SSL.pm', ); Net-SMTP-SSL-1.03/MANIFEST000644 000767 000024 00000000263 12541415310 014636 0ustar00rjbsstaff000000 000000 Changes lib/Net/SMTP/SSL.pm Makefile.PL MANIFEST This list of files META.yml README t/test.t META.json Module JSON meta-data (added by MakeMaker) Net-SMTP-SSL-1.03/META.json000644 000767 000024 00000001755 12541415310 015135 0ustar00rjbsstaff000000 000000 { "abstract" : "SSL support for Net::SMTP", "author" : [ "Casey West " ], "dynamic_config" : 1, "generated_by" : "ExtUtils::MakeMaker version 7.0401, CPAN::Meta::Converter version 2.150005", "license" : [ "unknown" ], "meta-spec" : { "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec", "version" : "2" }, "name" : "Net-SMTP-SSL", "no_index" : { "directory" : [ "t", "inc" ] }, "prereqs" : { "build" : { "requires" : { "ExtUtils::MakeMaker" : "0" } }, "configure" : { "requires" : { "ExtUtils::MakeMaker" : "0" } }, "runtime" : { "requires" : { "IO::Socket::SSL" : "0", "Net::SMTP" : "0", "Test::More" : "0.47" } } }, "release_status" : "stable", "version" : "1.03", "x_serialization_backend" : "JSON::PP version 2.27300" } Net-SMTP-SSL-1.03/META.yml000644 000767 000024 00000001130 12541415310 014750 0ustar00rjbsstaff000000 000000 --- abstract: 'SSL support for Net::SMTP' author: - 'Casey West ' build_requires: ExtUtils::MakeMaker: '0' configure_requires: ExtUtils::MakeMaker: '0' dynamic_config: 1 generated_by: 'ExtUtils::MakeMaker version 7.0401, CPAN::Meta::Converter version 2.150005' license: unknown meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html version: '1.4' name: Net-SMTP-SSL no_index: directory: - t - inc requires: IO::Socket::SSL: '0' Net::SMTP: '0' Test::More: '0.47' version: '1.03' x_serialization_backend: 'CPAN::Meta::YAML version 0.016' Net-SMTP-SSL-1.03/README000644 000767 000024 00000001543 12505101044 014363 0ustar00rjbsstaff000000 000000 NAME Net::SMTP::SSL - SSL support for Net::SMTP SYNOPSIS use Net::SMTP::SSL; my $smtps = Net::SMTP::SSL->new("example.com", Port => 465); DESCRIPTION Implements the same API as Net::SMTP, but uses IO::Socket::SSL for its network operations. Due to the nature of "Net::SMTP"'s "new" method, it is not overridden to make use of a default port for the SMTPS service. Perhaps future versions will be smart like that. Port 465 is usually what you want, and it's not a pain to specify that. For interface documentation, please see Net::SMTP. SEE ALSO Net::SMTP, IO::Socket::SSL, perl. AUTHOR Casey West, . COPYRIGHT Copyright (c) 2004 Casey West. All rights reserved. This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. Net-SMTP-SSL-1.03/t/000755 000767 000024 00000000000 12541415310 013747 5ustar00rjbsstaff000000 000000 Net-SMTP-SSL-1.03/t/test.t000644 000767 000024 00000000132 12541414673 015122 0ustar00rjbsstaff000000 000000 use Test::More tests => 1; require Net::SMTP::SSL; ok(Net::SMTP::SSL->isa('Net::SMTP')); Net-SMTP-SSL-1.03/lib/Net/000755 000767 000024 00000000000 12541415310 015000 5ustar00rjbsstaff000000 000000 Net-SMTP-SSL-1.03/lib/Net/SMTP/000755 000767 000024 00000000000 12541415310 015563 5ustar00rjbsstaff000000 000000 Net-SMTP-SSL-1.03/lib/Net/SMTP/SSL.pm000644 000767 000024 00000002666 12541415070 016577 0ustar00rjbsstaff000000 000000 package Net::SMTP::SSL; use strict; our $VERSION = '1.03'; use IO::Socket::SSL; use Net::SMTP; our @ISA = ( 'IO::Socket::SSL', grep { $_ ne 'IO::Socket::INET' } @Net::SMTP::ISA ); sub isa { my $self = shift; return 1 if $_[0] eq 'Net::SMTP'; return $self->SUPER::isa(@_); } no strict 'refs'; foreach ( keys %Net::SMTP:: ) { next unless (ref(\$Net::SMTP::{$_}) eq "GLOB" && defined(*{$Net::SMTP::{$_}}{CODE})) || ref(\$Net::SMTP::{$_}) eq "REF"; *{$_} = \&{"Net::SMTP::$_"}; } 1; __END__ =head1 NAME Net::SMTP::SSL - SSL support for Net::SMTP =head1 SYNOPSIS use Net::SMTP::SSL; my $smtps = Net::SMTP::SSL->new("example.com", Port => 465); =head1 DESCRIPTION Implements the same API as L, but uses L for its network operations. Due to the nature of C's C method, it is not overridden to make use of a default port for the SMTPS service. Perhaps future versions will be smart like that. Port C<465> is usually what you want, and it's not a pain to specify that. For interface documentation, please see L. =head1 SEE ALSO L, L, L. =head1 AUTHOR Casey West, >. =head1 COPYRIGHT Copyright (c) 2004 Casey West. All rights reserved. This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. =cut