File Coverage

blib/lib/Toolforge/MixNMatch/Print/YearMonth.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 0 1 0.0
total 12 13 92.3


line stmt bran cond sub pod time code
1             package Toolforge::MixNMatch::Print::YearMonth;
2              
3 6     6   258182 use strict;
  6         42  
  6         179  
4 6     6   31 use warnings;
  6         16  
  6         525  
5              
6             our $VERSION = 0.02;
7              
8             sub print {
9 5     5 0 222 my $obj = shift;
10              
11 5         14 my $print = $obj->year.'/'.$obj->month.': '.$obj->count;
12              
13 5         90 return $print;
14             }
15              
16             1;
17              
18             __END__