Constrained genericity: Difference between revisions

=={{header|Perl 6}}==

{{works with|Rakudo|2010.09.17}}

<lang perl6>subset Eatable of Any where { .^can('eat') };