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)