Mixin::ExtraFields::Param − make your class provide a familiar "param" method
version 0.020
package Widget::Parametric; use Mixin::ExtraFields::Param −fields => { driver => 'HashGuts' };; ... my $widget = Widget::Parametric−>new({ flavor => 'vanilla' }); printf "%s: %s\n", $_, $widget−>param($_) for $widget−>param;
This module mixes in to your class to provide a "param" method like the ones provided by CGI , CGI::Application, and other classes. It uses Mixin::ExtraFields, which means it can use any Mixin::ExtraFields driver to store your data.
By default, the methods provided are:
• |
param |
|||
• |
exists_param |
|||
• |
delete_param |
These methods are imported by the "fields" group, which must be requested. If a "moniker" argument is supplied, the moniker is used instead of "param". For more information, see Mixin::ExtraFields.
param
my @params = $object−>param; # get names of existing params my $value = $object−>param('name'); # get value of a param my $value = $object−>param(name => $value); # set a param's value my @values = $object−>param(n1 => $v1, n2 => $v2, ...); # set many values
This method sets or retrieves parameters.
Ricardo SIGNES <rjbs AT cpan DOT org>
This software is copyright (c) 2005 by Ricardo SIGNES.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.