File Coverage

examples/trim.pl
Criterion Covered Total %
statement 10 10 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 13 13 100.0


line stmt bran cond sub pod time code
1 1     1   6093 use warnings;
  1         2  
  1         62  
2 1     1   38 use 5.020;
  1         4  
3 1     1   556 use Data::Section::Pluggable;
  1         5  
  1         1584  
4              
5 1         275501 my $dsp = Data::Section::Pluggable->new
6             ->add_plugin('trim');
7              
8             # prints "Welcome to Perl" without prefix
9             # or trailing white space.
10 1         5 say $dsp->get_data_section('hello.txt');
11              
12             __DATA__