Sub::HandlesVia::Manual::WithMouse(3pm) | User Contributed Perl Documentation | Sub::HandlesVia::Manual::WithMouse(3pm) |
Sub::HandlesVia::Manual::WithMouse - using Sub::HandlesVia with Mouse
package Kitchen { use Mouse; use Sub::HandlesVia; use Types::Standard qw( ArrayRef Str ); has food => ( is => 'ro', isa => ArrayRef[Str], handles_via => 'Array', default => sub { [] }, handles => { 'add_food' => 'push', 'find_food' => 'grep', }, ); }
(If you have a mouse in your kitchen, that might not be very hygienic.)
Sub::HandlesVia allows you to delegate methods from your class to the values of your objects' attributes.
Conceptually, it allows you to define "$object->push_number($n)" to be a shortcut for "$object->numbers->push($n)" except that "$object->numbers" is an arrayref, so doesn't have methods you can call on it like "push".
You should be able to use Sub::HandlesVia as a drop-in replacement for MouseX::NativeTraits, just replacing "traits => ['Array']" in an attribute definition with "handles_via => 'Array'".
Mouse roles are only partially supported.
package R1 { use Mouse:Role; } package R2 { use Mouse:Role; use Sub::HandlesVia; # define some attributes with delegation } # This class is broken. package C1 { use Mouse; with 'R1', 'R2'; } # This class should work. package C2 { use Mouse; with 'R1'; with 'R2'; }
For details, see <https://github.com/tobyink/p5-sub-handlesvia/issues/9>.
Patches to fix the issue are very welcome!
The "handles_via" option indicates which library of methods should be available. Valid values include Array, Blessed, Bool, Code, Counter, Enum, Hash, Number, Scalar, and String.
An arrayref can be provided for "handles_via", though many of the options are conceptually contradictory.
handles_via => [ 'Number', 'Scalar' ]
Although the synopsis shows Types::Standard being used for type constraints, Mouse native types should also work fine.
package Kitchen { use Mouse; use Sub::HandlesVia; has food => ( is => 'ro', isa => 'ArrayRef[Str]', handles_via => 'Array', default => sub { [] }, handles => { 'add_food' => 'push', 'find_food' => 'grep', }, ); }
Sub::HandlesVia will also recognize MouseX::NativeTraits-style "traits". It will jump in and handle them before MouseX::NativeTraits notices!
package Kitchen { use Mouse; use Sub::HandlesVia; has food => ( is => 'ro', isa => 'ArrayRef[Str]', traits => ['Array'], default => sub { [] }, handles => { 'add_food' => 'push', 'find_food' => 'grep', }, ); }
Please report any bugs to <https://github.com/tobyink/p5-sub-handlesvia/issues>.
Misc advanced documentation: Sub::HandlesVia::Manual::Advanced.
Sub::HandlesVia.
Documentation for delegatable methods: Sub::HandlesVia::HandlerLibrary::Array, Sub::HandlesVia::HandlerLibrary::Blessed, Sub::HandlesVia::HandlerLibrary::Bool, Sub::HandlesVia::HandlerLibrary::Code, Sub::HandlesVia::HandlerLibrary::Counter, Sub::HandlesVia::HandlerLibrary::Enum, Sub::HandlesVia::HandlerLibrary::Hash, Sub::HandlesVia::HandlerLibrary::Number, Sub::HandlesVia::HandlerLibrary::Scalar, and Sub::HandlesVia::HandlerLibrary::String.
Toby Inkster <tobyink@cpan.org>.
This software is copyright (c) 2022 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-04-09 | perl v5.36.0 |