NAME

Email::Address::Loose - Make Email::Address->parse() loose

SYNOPSIS

my $address = 'read..rfc822.@docomo.ne.jp'; # Email::Addess can't find

use Email::Address::Loose;
my @emails = Email::Address::Loose->parse($address); # findable
 
use Email::Address;
use Email::Address::Loose;

Email::Address::Loose->globally_override;
my @emails = Email::Address->parse($address); # findable

use Email::Address;
use Email::Address::Loose -override;
my @emails = Email::Address->parse($address); # findable

DESCRIPTION

Email::Address::Loose is-a Email::Address, but parse() is "loose" as Email::Valid::Loose.

EXTENDED METHODS

parse( $addresses )

my ($email) = Email::Address::Loose->parse('Docomo <read_rfc822.@docomo.ne.jp>');

see "parse" in Email::Address.

ORIGINAL METHODS

globally_override

Email::Address::Loose->globally_override;

Now changes Email::Address->parse into Email::Address::Loose->parse.

use Email::Address::Loose -override;

Same thing, compile time.

globally_unoverride

Email::Address::Loose->globally_unoverride;

Restores override-ed Email::Address->parse.

AUTHOR

Naoki Tomita <tomita@cpan.org>

LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

SEE ALSO

Email::Address, Email::Valid::Loose

http://coderepos.org/share/browser/lang/perl/Email-Address-Loose (repository)