File Coverage

blib/lib/CPAN/Testers/Fact/LegacyReport.pm
Criterion Covered Total %
statement 15 20 75.0
branch n/a
condition n/a
subroutine 5 8 62.5
pod 2 3 66.6
total 22 31 70.9


line stmt bran cond sub pod time code
1 1     1   381 use 5.006;
  1         2  
  1         36  
2 1     1   4 use strict;
  1         0  
  1         24  
3 1     1   4 use warnings;
  1         1  
  1         36  
4              
5             package CPAN::Testers::Fact::LegacyReport;
6             # ABSTRACT: an email-style report for CPAN Testers
7              
8             our $VERSION = '1.999003';
9              
10 1     1   4 use Carp ();
  1         0  
  1         13  
11              
12 1     1   3 use Metabase::Fact::Hash 0.016;
  1         23  
  1         113  
13             our @ISA = qw/Metabase::Fact::Hash/;
14              
15 0     0 0   sub required_keys { qw/grade osname osversion archname perl_version textreport/ }
16              
17             sub content_metadata {
18 0     0 1   my ($self) = @_;
19 0           my $content = $self->content;
20             return {
21 0           grade => $content->{grade},
22             osname => $content->{osname},
23             osversion => $content->{osversion},
24             archname => $content->{archname},
25             perl_version => $content->{perl_version},
26             };
27             }
28              
29             sub content_metadata_types {
30             return {
31 0     0 1   grade => '//str',
32             osname => '//str',
33             osversion => '//str',
34             archname => '//str',
35             perl_version => '//str',
36             };
37             }
38              
39             1;
40              
41             __END__