File Coverage

blib/lib/Perinci/Object.pm
Criterion Covered Total %
statement 22 24 91.6
branch n/a
condition n/a
subroutine 10 11 90.9
pod 8 8 100.0
total 40 43 93.0


line stmt bran cond sub pod time code
1             package Perinci::Object;
2              
3             our $DATE = '2017-02-03'; # DATE
4             our $VERSION = '0.30'; # VERSION
5              
6 7     7   152878 use 5.010001;
  7         22  
7 7     7   37 use strict;
  7         14  
  7         164  
8 7     7   27 use warnings;
  7         8  
  7         2061  
9              
10             require Exporter;
11             our @ISA = qw(Exporter);
12             our @EXPORT = qw(rimeta risub rivar ripkg envres envresmulti envrestable
13             riresmeta);
14              
15             sub rimeta {
16 4     4 1 1542 require Perinci::Object::Metadata;
17 4         15 Perinci::Object::Metadata->new(@_);
18             }
19              
20             sub risub {
21 12     12 1 1798 require Perinci::Object::Function;
22 12         42 Perinci::Object::Function->new(@_);
23             }
24              
25             sub rivar {
26 1     1 1 803 require Perinci::Object::Variable;
27 1         15 Perinci::Object::Variable->new(@_);
28             }
29              
30             sub ripkg {
31 1     1 1 478 require Perinci::Object::Package;
32 1         9 Perinci::Object::Package->new(@_);
33             }
34              
35             sub envres {
36 1     1 1 577 require Perinci::Object::EnvResult;
37 1         8 Perinci::Object::EnvResult->new(@_);
38             }
39              
40             sub envresmulti {
41 5     5 1 2132 require Perinci::Object::EnvResultMulti;
42 5         20 Perinci::Object::EnvResultMulti->new(@_);
43             }
44              
45             sub envrestable {
46 0     0 1 0 require Perinci::Object::EnvResultTable;
47 0         0 Perinci::Object::EnvResultTable->new(@_);
48             }
49              
50             sub riresmeta {
51 1     1 1 589 require Perinci::Object::ResMeta;
52 1         9 Perinci::Object::ResMeta->new(@_);
53             }
54              
55             1;
56             # ABSTRACT: Object-oriented interface for Rinci metadata
57              
58             __END__