package DTL::Fast::Filter::Striptags;
use strict;
use utf8;
use warnings FATAL => 'all';
use parent 'DTL::Fast::Filter';
$DTL::Fast::FILTER_HANDLERS{striptags} = __PACKAGE__;
#@Override
sub filter
{
shift; # self
shift; # filter_manager
my $value = shift;
$value =~ s/<\/?[^>]+?>//gsi;
return $value;
}
1;