HTML::Widget::Filter::Callback - Lower Case Filter

HTML-Widget documentation Contained in the HTML-Widget distribution.

Index

Code Index:

NAME

Top

HTML::Widget::Filter::Callback - Lower Case Filter

SYNOPSIS

Top

    my $f = $widget->filter( 'Callback', 'foo' )->callback(sub {
        my $value=shift;
        $value =~ s/before/after/g;
        return $value;
    });

DESCRIPTION

Top

Callback Filter.

METHODS

Top

callback

Top

Argument: \&callback

Define the callback to be used for filter.

cb is an alias for callback.

filter

AUTHOR

Top

Lyo Kato, lyo.kato@gmail.com

LICENSE

Top

This library is free software, you can redistribute it and/or modify it under the same terms as Perl itself.

HTML-Widget documentation Contained in the HTML-Widget distribution. 
package HTML::Widget::Filter::Callback;

use warnings;
use strict;
use base 'HTML::Widget::Filter';

__PACKAGE__->mk_accessors(qw/callback/);

*cb = \&callback;


sub filter {
    my ( $self, $value ) = @_;
    my $callback = $self->callback || sub { $_[0] };
    return $callback->($value);
}


1;