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   171 use v5.10;
  9         45  
6              
7 9     9   51 use strict;
  9         31  
  9         192  
8 9     9   42 use warnings;
  9         16  
  9         341  
9              
10             use Type::Library
11 9         91 -base,
12 9     9   4801 ;
  9         245232  
13              
14 9     9   7716 use Type::Utils -all;
  9         45230  
  9         96  
15 9     9   36184 use Types::Standard -types;
  9         466607  
  9         120  
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__