Email::Handle is a Objective Email Handler.

SYNOPSIS

use Email::Handle;

my $email = Email::Handle->new(root@example.com);
print $email->is_valid ? yes : no;
print $email->obfuscate;
print $email->anonymize;
print $email;
$email->send(From => foo@example.com);
This module is also convenient for using on the DB application with Template and Class::DBI / DBIx::Class.
# setup the table that has column of email with this module
my $loader = Class::DBI::Loader->new(
...
namespace => MyApp
);
$loader->find_class(user)->has_a(email => Email::Handle);

# then output records with TT2
my $tmpl = Template->new;
$tmpl->process(
sample.tt,
{ users => $loader->find_class(user)->retrieve_all }
);

# You can write the template with some methods of this module like this
[% WHILE (user IN users) %]
[% user.email.obfuscate IF user.email.is_valid %]
[% END %]