![]() |
![]()
| ![]() |
![]()
NAMESub::HandlesVia::HandlerLibrary::Scalar - library of scalar-related methods SYNOPSISpackage My::Class { use Moo; use Sub::HandlesVia; use Types::Standard 'Any'; has attr => ( is => 'rwp', isa => Any, handles_via => 'Scalar', handles => { 'my_make_getter' => 'make_getter', 'my_make_setter' => 'make_setter', 'my_scalar_reference' => 'scalar_reference', }, ); } DESCRIPTIONThis is a library of methods for Sub::HandlesVia. DELEGATABLE METHODSmake_getter()Returns a getter coderef. my $object = My::Class->new( attr => 10 ); my $getter = $object->my_make_getter; $object->_set_attr( 11 ); say $getter->(); ## ==> 11 make_setter()Returns a setter coderef. my $object = My::Class->new( attr => 10 ); my $setter = $object->my_make_setter; $setter->( 11 ); say $object->attr; ## ==> 11 scalar_reference()Returns a scalar reference to the attribute value's slot within its object. my $object = My::Class->new( attr => 10 ); my $ref = $object->my_scalar_reference; $$ref++; say $object->attr; ## ==> 11 BUGSPlease report any bugs to <https://github.com/tobyink/p5-sub-handlesvia/issues>. SEE ALSOSub::HandlesVia. AUTHORToby Inkster <tobyink@cpan.org>. COPYRIGHT AND LICENCEThis software is copyright (c) 2020, 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. DISCLAIMER OF WARRANTIESTHIS 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.
|