| HTML-Widget documentation | Contained in the HTML-Widget distribution. |
HTML::Widget::Filter::UpperCase - Upper Case Filter
my $f = $widget->filter( 'UpperCase', 'foo' );
Upper Case Filter.
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-Widget documentation | Contained in the HTML-Widget distribution. |
package HTML::Widget::Filter::UpperCase; use warnings; use strict; use base 'HTML::Widget::Filter';
sub filter { my ( $self, $value ) = @_; return uc $value; }
1;