1 package Reaction::Types::Email;
4 -declare => [qw/EmailAddress/];
6 use Reaction::Types::Core 'NonEmptySimpleStr';
10 => as 'NonEmptySimpleStr'
11 => where { Email::Valid->address($_) }
12 => message { "Must be a valid e-mail address" };
18 Reaction::Types::Email
32 =item * L<Reaction::Types::Core>
38 See L<Reaction::Class> for authors.
42 See L<Reaction::Class> for the license.