NAME
Evo::Class::T
VERSION
version 0.0405
DESCRIPTION
Types for "check" in Evo::Class. Right now there aren't so many of them.
SYNOPSYS
{
package My::Foo;
use Evo -Class, '-Class::T *';
has status => check => T_ENUM("ok", "not ok");
}
my $obj = My::Foo->new(status => "ok");
$obj->status("badVal"); # dies
FUNCTIONS
T_ENUM
my $check = T_ENUM("ok", "good");
my($ok, $err) = $check->("bad");
Enum checker - a value must be one of the list;
AUTHOR
alexbyk.com
COPYRIGHT AND LICENSE
This software is copyright (c) 2016 by alexbyk.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.