File Coverage

blib/lib/M3/ServerView/Entry.pm
Criterion Covered Total %
statement 8 8 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 1 1 100.0
total 12 12 100.0


line stmt bran cond sub pod time code
1             package M3::ServerView::Entry;
2              
3 5     5   1119 use strict;
  5         11  
  5         165  
4 5     5   26 use warnings;
  5         9  
  5         995  
5              
6             sub new {
7 71     71 1 106 my ($pkg) = @_;
8 71         323 my $self = bless {}, $pkg;
9             }
10              
11             1;
12             __END__