File Coverage

blib/lib/App/HL7/Compare/Parser.pm
Criterion Covered Total %
statement 19 19 100.0
branch n/a
condition n/a
subroutine 7 7 100.0
pod 0 1 0.0
total 26 27 96.3


line stmt bran cond sub pod time code
1             package App::HL7::Compare::Parser;
2             $App::HL7::Compare::Parser::VERSION = '0.001';
3 3     3   68694 use v5.10;
  3         17  
4 3     3   18 use strict;
  3         6  
  3         59  
5 3     3   16 use warnings;
  3         14  
  3         83  
6              
7 3     3   601 use Moo;
  3         11737  
  3         14  
8 3     3   2706 use Mooish::AttributeBuilder -standard;
  3         1822  
  3         17  
9 3     3   1715 use App::HL7::Compare::Parser::Message;
  3         10  
  3         317  
10              
11             sub parse
12             {
13 8     8 0 5054 my ($self, $input, %opts) = @_;
14              
15 8         157 return App::HL7::Compare::Parser::Message->new(%opts, input => $input);
16             }
17              
18             1;
19