Hello community, here is the log from the commit of package perl-Email-Valid for openSUSE:Factory checked in at 2016-04-12 19:33:21 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Email-Valid (Old) and /work/SRC/openSUSE:Factory/.perl-Email-Valid.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "perl-Email-Valid" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Email-Valid/perl-Email-Valid.changes 2015-10-30 13:43:38.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.perl-Email-Valid.new/perl-Email-Valid.changes 2016-04-12 19:33:23.000000000 +0200 @@ -1,0 +2,17 @@ +Mon Apr 4 09:38:59 UTC 2016 - coolo@suse.com + +- updated to 1.200 + see /usr/share/doc/packages/perl-Email-Valid/Changes + + 1.200 2016-03-27 17:36:57-04:00 America/New_York + - skip more tests when Net::Domain::TLD not available, as required + + 1.199 2016-03-27 09:58:03-04:00 America/New_York + - More "no MX found" fixes (thanks, Troy Morehouse) + - treat restricted/reserved TLDs (invalid, test, example, localhost) + as invalid (thanks, Steve Bertrand!) + - Made first mention of various external modules be L<> linked. + - Added link to RFC822 to SEE ALSO + - Various typo and formatting fixes + +------------------------------------------------------------------- Old: ---- Email-Valid-1.198.tar.gz New: ---- Email-Valid-1.200.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Email-Valid.spec ++++++ --- /var/tmp/diff_new_pack.NPZQsw/_old 2016-04-12 19:33:24.000000000 +0200 +++ /var/tmp/diff_new_pack.NPZQsw/_new 2016-04-12 19:33:24.000000000 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-Email-Valid # -# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany. +# Copyright (c) 2016 SUSE LINUX GmbH, Nuernberg, Germany. # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -17,7 +17,7 @@ Name: perl-Email-Valid -Version: 1.198 +Version: 1.200 Release: 0 %define cpan_name Email-Valid Summary: Check validity of Internet email addresses @@ -46,7 +46,8 @@ optionally, whether a mail host exists for the domain. Please note that there is no way to determine whether an address is -deliverable without attempting delivery (for details, see perlfaq 9). +deliverable without attempting delivery (for details, see at +http://perldoc.perl.org/perlfaq9.html#How-do-I-check-a-valid-mail-address). %prep %setup -q -n %{cpan_name}-%{version} ++++++ Email-Valid-1.198.tar.gz -> Email-Valid-1.200.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Email-Valid-1.198/Changes new/Email-Valid-1.200/Changes --- old/Email-Valid-1.198/Changes 2015-10-26 03:36:41.000000000 +0100 +++ new/Email-Valid-1.200/Changes 2016-03-27 23:37:00.000000000 +0200 @@ -1,5 +1,16 @@ Revision history for Perl extension Email::Valid. +1.200 2016-03-27 17:36:57-04:00 America/New_York + - skip more tests when Net::Domain::TLD not available, as required + +1.199 2016-03-27 09:58:03-04:00 America/New_York + - More "no MX found" fixes (thanks, Troy Morehouse) + - treat restricted/reserved TLDs (invalid, test, example, localhost) + as invalid (thanks, Steve Bertrand!) + - Made first mention of various external modules be L<> linked. + - Added link to RFC822 to SEE ALSO + - Various typo and formatting fixes + 1.198 2015-10-25 22:36:37-04:00 America/New_York - fix a typo that caused the MX check to die diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Email-Valid-1.198/MANIFEST new/Email-Valid-1.200/MANIFEST --- old/Email-Valid-1.198/MANIFEST 2015-10-26 03:36:41.000000000 +0100 +++ new/Email-Valid-1.200/MANIFEST 2016-03-27 23:37:00.000000000 +0200 @@ -1,4 +1,4 @@ -# This file was automatically generated by Dist::Zilla::Plugin::Manifest v5.040. +# This file was automatically generated by Dist::Zilla::Plugin::Manifest v5.043. Changes LICENSE MANIFEST diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Email-Valid-1.198/META.json new/Email-Valid-1.200/META.json --- old/Email-Valid-1.198/META.json 2015-10-26 03:36:41.000000000 +0100 +++ new/Email-Valid-1.200/META.json 2016-03-27 23:37:00.000000000 +0200 @@ -4,7 +4,7 @@ "Maurice Aubrey " ], "dynamic_config" : 0, - "generated_by" : "Dist::Zilla version 5.040, CPAN::Meta::Converter version 2.150005", + "generated_by" : "Dist::Zilla version 5.043, CPAN::Meta::Converter version 2.150005", "license" : [ "perl_5" ], @@ -60,10 +60,10 @@ "web" : "https://github.com/rjbs/Email-Valid" } }, - "version" : "1.198", + "version" : "1.200", "x_Dist_Zilla" : { "perl" : { - "version" : "5.023004" + "version" : "5.023008" }, "plugins" : [ { @@ -128,62 +128,62 @@ { "class" : "Dist::Zilla::Plugin::PruneCruft", "name" : "@Filter/@Filter/PruneCruft", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::ManifestSkip", "name" : "@Filter/@Filter/ManifestSkip", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::MetaYAML", "name" : "@Filter/@Filter/MetaYAML", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::License", "name" : "@Filter/@Filter/License", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::Readme", "name" : "@Filter/@Filter/Readme", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::ExecDir", "name" : "@Filter/@Filter/ExecDir", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::ShareDir", "name" : "@Filter/@Filter/ShareDir", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::Manifest", "name" : "@Filter/@Filter/Manifest", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::TestRelease", "name" : "@Filter/@Filter/TestRelease", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::ConfirmRelease", "name" : "@Filter/@Filter/ConfirmRelease", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::UploadToCPAN", "name" : "@Filter/@Filter/UploadToCPAN", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::AutoPrereqs", "name" : "@Filter/AutoPrereqs", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::Git::NextVersion", @@ -203,22 +203,22 @@ { "class" : "Dist::Zilla::Plugin::PkgVersion", "name" : "@Filter/PkgVersion", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::MetaConfig", "name" : "@Filter/MetaConfig", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::MetaJSON", "name" : "@Filter/MetaJSON", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::NextRelease", "name" : "@Filter/NextRelease", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::Test::ChangesHasContent", @@ -228,12 +228,12 @@ { "class" : "Dist::Zilla::Plugin::PodSyntaxTests", "name" : "@Filter/PodSyntaxTests", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::Test::ReportPrereqs", "name" : "@Filter/Test::ReportPrereqs", - "version" : "0.021" + "version" : "0.024" }, { "class" : "Dist::Zilla::Plugin::Prereqs", @@ -244,7 +244,7 @@ } }, "name" : "@Filter/TestMoreWithSubtests", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::PodWeaver", @@ -417,7 +417,7 @@ "branch" : null, "changelog" : "Changes", "signed" : 0, - "tag" : "1.198", + "tag" : "1.200", "tag_format" : "%v", "tag_message" : "v%v" }, @@ -461,7 +461,7 @@ } }, "name" : "@Filter/Git::Contributors", - "version" : "0.014" + "version" : "0.020" }, { "class" : "Dist::Zilla::Plugin::MakeMaker::Runner", @@ -471,57 +471,57 @@ } }, "name" : "MakeMaker::Runner", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":InstallModules", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":IncModules", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":TestFiles", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":ExtraTestFiles", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":ExecFiles", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":PerlExecFiles", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":ShareFiles", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":MainModule", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":AllFiles", - "version" : "5.040" + "version" : "5.043" }, { "class" : "Dist::Zilla::Plugin::FinderCode", "name" : ":NoFiles", - "version" : "5.040" + "version" : "5.043" } ], "zilla" : { @@ -529,7 +529,7 @@ "config" : { "is_trial" : "0" }, - "version" : "5.040" + "version" : "5.043" } }, "x_contributors" : [ @@ -537,8 +537,10 @@ "Karel Miko ", "McA ", "Michael Schout ", + "Mohammad S Anwar ", + "Neil Bowers ", "Ricardo SIGNES ", - "Ricardo Signes ", + "Steve Bertrand ", "Svetlana ", "Troy Morehouse " ] diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Email-Valid-1.198/META.yml new/Email-Valid-1.200/META.yml --- old/Email-Valid-1.198/META.yml 2015-10-26 03:36:41.000000000 +0100 +++ new/Email-Valid-1.200/META.yml 2016-03-27 23:37:00.000000000 +0200 @@ -7,7 +7,7 @@ File::Spec: '0' Test::More: '0.96' dynamic_config: 0 -generated_by: 'Dist::Zilla version 5.040, CPAN::Meta::Converter version 2.150005' +generated_by: 'Dist::Zilla version 5.043, CPAN::Meta::Converter version 2.150005' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -29,10 +29,10 @@ bugtracker: https://github.com/rjbs/Email-Valid/issues homepage: https://github.com/rjbs/Email-Valid repository: https://github.com/rjbs/Email-Valid.git -version: '1.198' +version: '1.200' x_Dist_Zilla: perl: - version: '5.023004' + version: '5.023008' plugins: - class: Dist::Zilla::Plugin::Git::GatherDir @@ -83,51 +83,51 @@ - class: Dist::Zilla::Plugin::PruneCruft name: '@Filter/@Filter/PruneCruft' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::ManifestSkip name: '@Filter/@Filter/ManifestSkip' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::MetaYAML name: '@Filter/@Filter/MetaYAML' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::License name: '@Filter/@Filter/License' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::Readme name: '@Filter/@Filter/Readme' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::ExecDir name: '@Filter/@Filter/ExecDir' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::ShareDir name: '@Filter/@Filter/ShareDir' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::Manifest name: '@Filter/@Filter/Manifest' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::TestRelease name: '@Filter/@Filter/TestRelease' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::ConfirmRelease name: '@Filter/@Filter/ConfirmRelease' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::UploadToCPAN name: '@Filter/@Filter/UploadToCPAN' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::AutoPrereqs name: '@Filter/AutoPrereqs' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::Git::NextVersion config: @@ -142,19 +142,19 @@ - class: Dist::Zilla::Plugin::PkgVersion name: '@Filter/PkgVersion' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::MetaConfig name: '@Filter/MetaConfig' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::MetaJSON name: '@Filter/MetaJSON' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::NextRelease name: '@Filter/NextRelease' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::Test::ChangesHasContent name: '@Filter/Test::ChangesHasContent' @@ -162,11 +162,11 @@ - class: Dist::Zilla::Plugin::PodSyntaxTests name: '@Filter/PodSyntaxTests' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::Test::ReportPrereqs name: '@Filter/Test::ReportPrereqs' - version: '0.021' + version: '0.024' - class: Dist::Zilla::Plugin::Prereqs config: @@ -174,7 +174,7 @@ phase: test type: requires name: '@Filter/TestMoreWithSubtests' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::PodWeaver config: @@ -307,7 +307,7 @@ branch: ~ changelog: Changes signed: 0 - tag: '1.198' + tag: '1.200' tag_format: '%v' tag_message: v%v Dist::Zilla::Role::Git::Repo: @@ -338,65 +338,67 @@ paths: - . name: '@Filter/Git::Contributors' - version: '0.014' + version: '0.020' - class: Dist::Zilla::Plugin::MakeMaker::Runner config: Dist::Zilla::Role::TestRunner: default_jobs: 1 name: MakeMaker::Runner - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::FinderCode name: ':InstallModules' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::FinderCode name: ':IncModules' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::FinderCode name: ':TestFiles' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::FinderCode name: ':ExtraTestFiles' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::FinderCode name: ':ExecFiles' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::FinderCode name: ':PerlExecFiles' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::FinderCode name: ':ShareFiles' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::FinderCode name: ':MainModule' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::FinderCode name: ':AllFiles' - version: '5.040' + version: '5.043' - class: Dist::Zilla::Plugin::FinderCode name: ':NoFiles' - version: '5.040' + version: '5.043' zilla: class: Dist::Zilla::Dist::Builder config: is_trial: '0' - version: '5.040' + version: '5.043' x_contributors: - 'Alexandr Ciornii ' - 'Karel Miko ' - 'McA ' - 'Michael Schout ' + - 'Mohammad S Anwar ' + - 'Neil Bowers ' - 'Ricardo SIGNES ' - - 'Ricardo Signes ' + - 'Steve Bertrand ' - 'Svetlana ' - 'Troy Morehouse ' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Email-Valid-1.198/README new/Email-Valid-1.200/README --- old/Email-Valid-1.198/README 2015-10-26 03:36:41.000000000 +0100 +++ new/Email-Valid-1.200/README 2016-03-27 23:37:00.000000000 +0200 @@ -1,7 +1,7 @@ This archive contains the distribution Email-Valid, -version 1.198: +version 1.200: Check validity of Internet email addresses @@ -11,5 +11,5 @@ the same terms as the Perl 5 programming language system itself. -This README file was generated by Dist::Zilla::Plugin::Readme v5.040. +This README file was generated by Dist::Zilla::Plugin::Readme v5.043. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Email-Valid-1.198/dist.ini new/Email-Valid-1.200/dist.ini --- old/Email-Valid-1.198/dist.ini 2015-10-26 03:36:41.000000000 +0100 +++ new/Email-Valid-1.200/dist.ini 2016-03-27 23:37:00.000000000 +0200 @@ -7,4 +7,5 @@ [@Filter] -bundle = @RJBS -remove = MakeMaker + [MakeMaker::Runner] diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Email-Valid-1.198/lib/Email/Valid.pm new/Email-Valid-1.200/lib/Email/Valid.pm --- old/Email-Valid-1.198/lib/Email/Valid.pm 2015-10-26 03:36:41.000000000 +0100 +++ new/Email-Valid-1.200/lib/Email/Valid.pm 2016-03-27 23:37:00.000000000 +0200 @@ -2,7 +2,7 @@ use strict; use warnings; package Email::Valid; -$Email::Valid::VERSION = '1.198'; +$Email::Valid::VERSION = '1.200'; # ABSTRACT: Check validity of Internet email addresses our ( $RFC822PAT, @@ -150,6 +150,7 @@ foreach my $mx (@mx_entries) { my $mxhost = $mx->exchange; my $query = $Resolver->search($mxhost); + next unless ($query); foreach my $a_rr ($query->answer) { return 1 unless $a_rr->type ne 'A'; } @@ -215,7 +216,10 @@ my $host = $self->_host( $args{address} or return $self->details('tld') ); my ($tld) = $host =~ m#\.(\w+)$#; - return Net::Domain::TLD::tld_exists($tld); + + my %invalid_tlds = map { $_ => 1 } qw(invalid test example localhost); + + return defined $invalid_tlds{$tld} ? 0 : Net::Domain::TLD::tld_exists($tld); } # Purpose: Check whether a DNS record (A or MX) exists for a domain. @@ -498,21 +502,21 @@ #pod optionally, whether a mail host exists for the domain. #pod #pod Please note that there is no way to determine whether an -#pod address is deliverable without attempting delivery (for details, see -#pod perlfaq 9). +#pod address is deliverable without attempting delivery +#pod (for details, see Lhttp://perldoc.perl.org/perlfaq9.html#How-do-I-check-a-valid-mail-address>). #pod #pod =head1 PREREQUISITES #pod -#pod This module requires perl 5.004 or later and the Mail::Address module. -#pod Either the Net::DNS module or the nslookup utility is required -#pod for DNS checks. The Net::Domain::TLD module is required to check the +#pod This module requires perl 5.004 or later and the LMail::Address module. +#pod Either the LNet::DNS module or the nslookup utility is required +#pod for DNS checks. The LNet::Domain::TLD module is required to check the #pod validity of top level domains. #pod #pod =head1 METHODS #pod -#pod Every method which accepts an <ADDRESS> parameter may -#pod be passed either a string or an instance of the Mail::Address -#pod class. All errors raise an exception. +#pod Every method which accepts an C<< <ADDRESS> >> parameter may +#pod be passed either a string or an instance of the Mail::Address +#pod class. All errors raise an exception. #pod #pod =over 4 #pod @@ -523,7 +527,7 @@ #pod control the behavior of the object at instantiation. #pod #pod The following named parameters are allowed. See the -#pod individual methods below of details. +#pod individual methods below for details. #pod #pod -mxcheck #pod -tldcheck @@ -543,8 +547,8 @@ #pod DNS checks. Using Net::DNS is the preferred method since error #pod handling is improved. If Net::DNS is available, you can modify #pod the behavior of the resolver (e.g. change the default tcp_timeout -#pod value) by manipulating the global Net::DNS::Resolver instance stored in -#pod $Email::Valid::Resolver. +#pod value) by manipulating the global LNet::DNS::Resolver instance stored in +#pod C<$Email::Valid::Resolver>. #pod #pod =item rfc822 ( <ADDRESS> ) #pod @@ -571,7 +575,7 @@ #pod #pod =item fqdn ( <TRUE>|<FALSE> ) #pod -#pod Species whether addresses passed to address() must contain a fully +#pod Specifies whether addresses passed to address() must contain a fully #pod qualified domain name (FQDN). The default is true. #pod #pod B FQDN checks only occur for non-domain-literals. In other @@ -606,10 +610,10 @@ #pod =item address ( <ADDRESS> ) #pod #pod This is the primary method which determines whether an email -#pod address is valid. It's behavior is modified by the values of +#pod address is valid. Its behavior is modified by the values of #pod mxcheck(), tldcheck(), local_rules(), fqdn(), and fudge(). If the address #pod passes all checks, the (possibly modified) address is returned as -#pod a string. Otherwise, the undefined value is returned. +#pod a string. Otherwise, undef is returned. #pod In a list context, the method also returns an instance of the #pod Mail::Address class representing the email address. #pod @@ -626,7 +630,7 @@ #pod tldcheck #pod #pod If the class is not instantiated, you can get the same information -#pod from the global $Email::Valid::Details. +#pod from the global C<$Email::Valid::Details>. #pod #pod =back #pod @@ -689,7 +693,11 @@ #pod #pod =head1 SEE ALSO #pod -#pod Mail::Address, Net::DNS, Net::Domain::TLD, perlfaq9 +#pod LMail::Address, LNet::DNS, LNet::Domain::TLD, Lhttps://metacpan.org/pod/distribution/perlfaq/lib/perlfaq9.pod> +#pod +#pod Lhttps://www.ietf.org/rfc/rfc0822.txt> - +#pod standard for the format of ARPA internet text messages. +#pod Superseded by Lhttps://www.ietf.org/rfc/rfc2822.txt>. #pod #pod =cut @@ -705,7 +713,7 @@ =head1 VERSION -version 1.198 +version 1.200 =head1 SYNOPSIS @@ -719,21 +727,21 @@ optionally, whether a mail host exists for the domain. Please note that there is no way to determine whether an -address is deliverable without attempting delivery (for details, see -perlfaq 9). +address is deliverable without attempting delivery +(for details, see Lhttp://perldoc.perl.org/perlfaq9.html#How-do-I-check-a-valid-mail-address>). =head1 PREREQUISITES -This module requires perl 5.004 or later and the Mail::Address module. -Either the Net::DNS module or the nslookup utility is required -for DNS checks. The Net::Domain::TLD module is required to check the +This module requires perl 5.004 or later and the LMail::Address module. +Either the LNet::DNS module or the nslookup utility is required +for DNS checks. The LNet::Domain::TLD module is required to check the validity of top level domains. =head1 METHODS - Every method which accepts an <ADDRESS> parameter may - be passed either a string or an instance of the Mail::Address - class. All errors raise an exception. +Every method which accepts an C<< <ADDRESS> >> parameter may +be passed either a string or an instance of the Mail::Address +class. All errors raise an exception. =over 4 @@ -744,7 +752,7 @@ control the behavior of the object at instantiation. The following named parameters are allowed. See the -individual methods below of details. +individual methods below for details. -mxcheck -tldcheck @@ -764,8 +772,8 @@ DNS checks. Using Net::DNS is the preferred method since error handling is improved. If Net::DNS is available, you can modify the behavior of the resolver (e.g. change the default tcp_timeout -value) by manipulating the global Net::DNS::Resolver instance stored in -$Email::Valid::Resolver. +value) by manipulating the global LNet::DNS::Resolver instance stored in +C<$Email::Valid::Resolver>. =item rfc822 ( <ADDRESS> ) @@ -792,7 +800,7 @@ =item fqdn ( <TRUE>|<FALSE> ) -Species whether addresses passed to address() must contain a fully +Specifies whether addresses passed to address() must contain a fully qualified domain name (FQDN). The default is true. B FQDN checks only occur for non-domain-literals. In other @@ -827,10 +835,10 @@ =item address ( <ADDRESS> ) This is the primary method which determines whether an email -address is valid. It's behavior is modified by the values of +address is valid. Its behavior is modified by the values of mxcheck(), tldcheck(), local_rules(), fqdn(), and fudge(). If the address passes all checks, the (possibly modified) address is returned as -a string. Otherwise, the undefined value is returned. +a string. Otherwise, undef is returned. In a list context, the method also returns an instance of the Mail::Address class representing the email address. @@ -847,7 +855,7 @@ tldcheck If the class is not instantiated, you can get the same information -from the global $Email::Valid::Details. +from the global C<$Email::Valid::Details>. =back @@ -910,7 +918,11 @@ =head1 SEE ALSO -Mail::Address, Net::DNS, Net::Domain::TLD, perlfaq9 +LMail::Address, LNet::DNS, LNet::Domain::TLD, Lhttps://metacpan.org/pod/distribution/perlfaq/lib/perlfaq9.pod> + +Lhttps://www.ietf.org/rfc/rfc0822.txt> - +standard for the format of ARPA internet text messages. +Superseded by Lhttps://www.ietf.org/rfc/rfc2822.txt>. =head1 AUTHOR @@ -918,7 +930,7 @@ =head1 CONTRIBUTORS -=for stopwords Alexandr Ciornii Karel Miko McA Michael Schout Ricardo SIGNES Signes Svetlana Troy Morehouse +=for stopwords Alexandr Ciornii Karel Miko McA Michael Schout Mohammad S Anwar Neil Bowers Ricardo SIGNES Steve Bertrand Svetlana Troy Morehouse =over 4 @@ -940,11 +952,19 @@ =item * +Mohammad S Anwar + +=item * + +Neil Bowers + +=item * + Ricardo SIGNES =item * -Ricardo Signes +Steve Bertrand =item * diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Email-Valid-1.198/t/00-report-prereqs.t new/Email-Valid-1.200/t/00-report-prereqs.t --- old/Email-Valid-1.198/t/00-report-prereqs.t 2015-10-26 03:36:41.000000000 +0100 +++ new/Email-Valid-1.200/t/00-report-prereqs.t 2016-03-27 23:37:00.000000000 +0200 @@ -3,7 +3,7 @@ use strict; use warnings; -# This test was generated by Dist::Zilla::Plugin::Test::ReportPrereqs 0.021 +# This test was generated by Dist::Zilla::Plugin::Test::ReportPrereqs 0.024 use Test::More tests => 1; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Email-Valid-1.198/t/valid.t new/Email-Valid-1.200/t/valid.t --- old/Email-Valid-1.198/t/valid.t 2015-10-26 03:36:41.000000000 +0100 +++ new/Email-Valid-1.200/t/valid.t 2016-03-27 23:37:00.000000000 +0200 @@ -1,7 +1,7 @@ #!perl use strict; -use Test::More tests => 35; +use Test::More tests => 39; BEGIN { use_ok('Email::Valid'); @@ -167,8 +167,9 @@ 'a domain literal address is not okay if we say -allow_ip=>0', ); + SKIP: { - skip "tests require Net::Domain::TLD 1.65", 4 + skip "tests require Net::Domain::TLD 1.65", 8 unless (eval {require Net::Domain::TLD;Net::Domain::TLD->VERSION(1.65);1}); { @@ -203,4 +204,24 @@ ), "allow_ip + domain literal = no tldcheck", ); + + ok( + ! $v->address( -address => '123@example.invalid', -tldcheck => 1), + '123@example.invalid is wrong as per IETF spec (invalid TLD)', + ); + + ok( + ! $v->address( -address => '123@example.test', -tldcheck => 1), + '123@example.test is wrong as per IETF spec (invalid TLD)', + ); + + ok( + ! $v->address( -address => '123@example.example', -tldcheck => 1), + '123@example.example is wrong as per IETF spec (invalid TLD)', + ); + + ok( + ! $v->address( -address => '123@example.localhost', -tldcheck => 1), + '123@example.localhost is wrong as per IETF spec (invalid TLD)', + ); } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Email-Valid-1.198/xt/release/changes_has_content.t new/Email-Valid-1.200/xt/release/changes_has_content.t --- old/Email-Valid-1.198/xt/release/changes_has_content.t 2015-10-26 03:36:41.000000000 +0100 +++ new/Email-Valid-1.200/xt/release/changes_has_content.t 2016-03-27 23:37:00.000000000 +0200 @@ -4,7 +4,7 @@ note 'Checking Changes'; my $changes_file = 'Changes'; -my $newver = '1.198'; +my $newver = '1.200'; my $trial_token = '-TRIAL'; SKIP: {