| HTML-FormFu documentation | Contained in the HTML-FormFu distribution. |
HTML::FormFu::Filter::Callback - filter with custom subroutine
$field->filter({
type => 'Callback',
callback => \&my_filter,
});
---
elements:
- type: Text
name: foo
filters:
- type: Callback
callback: "main::my_filter"
sub my_filter {
my ($value) = @_;
# do something to $value
return $value;
}
Filter using a user-provided subroutine.
Arguments: \&code-reference
Arguments: "subroutine-name"
Carl Franks, cfranks@cpan.org
Based on the original source code of HTML::Widget::Filter::Callback, by
Lyo Kato, lyo.kato@gmail.com
This library is free software, you can redistribute it and/or modify it under the same terms as Perl itself.
| HTML-FormFu documentation | Contained in the HTML-FormFu distribution. |
package HTML::FormFu::Filter::Callback; use Moose; extends 'HTML::FormFu::Filter'; has callback => ( is => 'rw', traits => ['Chained'] ); sub filter { my ( $self, $value, $params ) = @_; my $callback = $self->callback || sub {$value}; no strict 'refs'; return $callback->( $value, $params ); } __PACKAGE__->meta->make_immutable; 1; __END__