File Coverage

blib/lib/Parse/ErrorString/Perl/StackItem.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition 1 3 33.3
subroutine 4 4 100.0
pod 0 1 0.0
total 17 20 85.0


line stmt bran cond sub pod time code
1             package Parse::ErrorString::Perl::StackItem;
2              
3              
4 6     6   49 use strict;
  6         15  
  6         186  
5 6     6   37 use warnings;
  6         15  
  6         598  
6              
7             our $VERSION = '0.27';
8              
9             sub new {
10 2     2 0 5 my ( $class, $self ) = @_;
11 2   33     10 bless $self, ref $class || $class;
12 2         6 return $self;
13             }
14              
15 6         51 use Class::XSAccessor getters => {
16             sub => 'sub',
17             file => 'file',
18             file_abspath => 'file_abspath',
19             file_msgpath => 'file_msgpath',
20             line => 'line',
21 6     6   41 };
  6         15  
22              
23             1;
24              
25             __END__