File Coverage

blib/lib/OTRS/OPM/Parser/Types.pm
Criterion Covered Total %
statement 17 17 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 23 23 100.0


line stmt bran cond sub pod time code
1             package OTRS::OPM::Parser::Types;
2              
3             # ABSTRACT: types for OTRS::OPM::Parser
4              
5 9     9   157 use v5.10;
  9         36  
6              
7 9     9   47 use strict;
  9         18  
  9         178  
8 9     9   43 use warnings;
  9         20  
  9         325  
9              
10             use Type::Library
11 9         95 -base,
12 9     9   4607 ;
  9         236338  
13              
14 9     9   7804 use Type::Utils -all;
  9         44581  
  9         94  
15 9     9   36266 use Types::Standard -types;
  9         461221  
  9         121  
16              
17             our $VERSION = '0.01';
18              
19             Type::Utils::extends('Types::Standard');
20              
21             declare VersionString =>
22             as Str,
23             where {
24             $_ =~ m{ \A (?:[0-9]+) (?:\.[0-9]+){0,2} (?:_\d+)? \z }xms
25             };
26              
27             declare FrameworkVersionString =>
28             as Str,
29             where {
30             $_ =~ m{ \A (?: (?:x|[0-9]+x?) \. ){1,2} (?: x | [0-9]+x? ) \z }xms
31             };
32              
33             declare XMLTree =>
34             as InstanceOf['XML::LibXML::Document'];
35              
36              
37             1;
38              
39             __END__