File Coverage

blib/lib/Template/Plugin/Filter/VisualTruncate/EUC_JP.pm
Criterion Covered Total %
statement 20 20 100.0
branch n/a
condition n/a
subroutine 7 7 100.0
pod 1 3 33.3
total 28 30 93.3


line stmt bran cond sub pod time code
1             package Template::Plugin::Filter::VisualTruncate::EUC_JP;
2              
3 1     1   227 use warnings;
  1         4  
  1         43  
4 1     1   6 use strict;
  1         2  
  1         45  
5              
6 1     1   7 use base qw( Template::Plugin::Filter );
  1         2  
  1         11  
7              
8 1     1   1473 use Text::VisualWidth::EUC_JP;
  1         6161  
  1         14  
9              
10             sub new {
11 1     1 1 3 my $class = shift;
12              
13 1         4 my $self = {};
14 1         5 bless $self, $class;
15              
16 1         13 return $self;
17             }
18              
19             sub width {
20 24     24 0 32 shift;
21 24         94 Text::VisualWidth::EUC_JP::width(@_);
22             }
23              
24             sub trim {
25 11     11 0 22 shift;
26 11         44 Text::VisualWidth::EUC_JP::trim(@_);
27             }
28              
29             1;