| Type::Tiny::Intersection(3pm) | User Contributed Perl Documentation | Type::Tiny::Intersection(3pm) |
Type::Tiny::Intersection - intersection type constraints
Using via the "&" operator overload:
package Local::Stash {
use Moo;
use Types::Common qw( LowerCaseStr StrLength );
has identifier => (
is => 'ro',
isa => (LowerCaseStr) & (StrLength[4, 8]),
);
}
my $x = Local::Stash->new( data => {} ); # not ok
my $y = Local::Stash->new( data => [] ); # not ok
Note that it is a good idea to enclose each type being intersected in parentheses to avoid Perl thinking the "&" is the sigil for a coderef.
Using Type::Tiny::Intersection's object-oriented interface:
package Local::Stash {
use Moo;
use Types::Common qw( LowerCaseStr StrLength );
use Type::Tiny::Intersection;
my $ShortLcStr = Type::Tiny::Intersection->new(
name => 'AnyData',
type_constraints => [ LowerCaseStr, StrLength[4, 8] ],
);
has identifier => (
is => 'ro',
isa => $ShortLcStr,
);
}
Using Type::Utils's functional interface:
package Local::Stash {
use Moo;
use Types::Common qw( LowerCaseStr StrLength );
use Type::Utils;
my $ShortLcStr = intersection ShortLcStr => [ LowerCaseStr, StrLength[4, 8] ];
has identifier => (
is => 'ro',
isa => $ShortLcStr,
);
}
This module is covered by the Type-Tiny stability policy.
Intersection type constraints.
Intersection type constraints are not often very useful. Consider the intersection of HashRef and ArrayRef. A value will only pass if it is both a hashref and an arrayref. Given that neither of those type constraints accept "undef" or overloaded objects, there is no possible value that can pass both.
Which is not to say that intersections are never useful, but it happens quite rarely.
This package inherits from Type::Tiny; see that for most documentation. Major differences are listed below:
The "new" constructor from Type::Tiny still works, of course. But there is also:
When passed to the constructor, if any of the type constraints in the intersection is itself an intersection type constraint, this is "exploded" into the new intersection.
(Technically any of the types in the intersection could be treated as a parent type; we choose the first arbitrarily.)
Please report any bugs to <https://github.com/tobyink/p5-type-tiny/issues>.
Type::Tiny::Manual.
Type::Tiny.
MooseX::Meta::TypeConstraint::Intersection.
Toby Inkster <tobyink@cpan.org>.
This software is copyright (c) 2013-2014, 2017-2023 by Toby Inkster.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
| 2023-07-21 | perl v5.36.0 |