blib/lib/XML/SRS/UDAIValid/Query.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 2 | 4 | 50.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | 2 | 2 | 100.0 |
pod | n/a | ||
total | 4 | 6 | 66.6 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | |||||||
2 | package XML::SRS::UDAIValid::Query; | ||||||
3 | BEGIN { | ||||||
4 | 1 | 1 | 1713 | $XML::SRS::UDAIValid::Query::VERSION = '0.09'; | |||
5 | } | ||||||
6 | |||||||
7 | 1 | 1 | 407 | use Moose; | |||
0 | |||||||
0 | |||||||
8 | use PRANG::Graph; | ||||||
9 | |||||||
10 | has_attr 'domain' => | ||||||
11 | is => 'ro', | ||||||
12 | isa => 'XML::SRS::DomainName', | ||||||
13 | xml_name => 'DomainName', | ||||||
14 | ; | ||||||
15 | |||||||
16 | has_attr 'udai' => | ||||||
17 | is => 'ro', | ||||||
18 | isa => 'XML::SRS::UDAI', | ||||||
19 | xml_name => 'UDAI', | ||||||
20 | ; | ||||||
21 | |||||||
22 | sub root_element {'UDAIValidQry'} | ||||||
23 | with 'XML::SRS::Query'; | ||||||
24 | 1; |