File Coverage

blib/lib/App/LDAP/ObjectClass/OrganizationalPerson.pm
Criterion Covered Total %
statement 4 6 66.6
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 6 8 75.0


line stmt bran cond sub pod time code
1             package App::LDAP::ObjectClass::OrganizationalPerson;
2              
3 1     1   6 use Modern::Perl;
  1         2  
  1         8  
4              
5 1     1   646 use Moose;
  0            
  0            
6              
7             extends qw(App::LDAP::ObjectClass::Person);
8              
9             has [qw( title
10             x121Address
11             registeredAddress
12             destinationIndicator
13             preferredDeliveryMethod
14             telexNumber
15             teletexTerminalIdentifier
16             telephoneNumber
17             internationaliSDNNumber
18             facsimileTelephoneNumber
19             street
20             postOfficeBox
21             postalCode
22             postalAddress
23             physicalDeliveryOfficeName
24             ou
25             st
26             l )] => (
27             is => "rw",
28             isa => "Str",
29             );
30              
31             __PACKAGE__->meta->make_immutable;
32             no Moose;
33              
34             1;
35              
36             =pod
37              
38             =head1 NAME
39              
40             App::LDAP::ObjectClass::OrganizationalPerson - schema of organizationalPerson
41              
42             =head1 DEFINITION
43              
44             objectclass (
45             2.5.6.7
46             NAME 'organizationalPerson'
47             DESC 'RFC2256: an organizational person'
48             SUP person
49             STRUCTURAL
50             MAY (
51             title $ x121Address $ registeredAddress $ destinationIndicator $
52             preferredDeliveryMethod $ telexNumber $ teletexTerminalIdentifier $
53             telephoneNumber $ internationaliSDNNumber $
54             facsimileTelephoneNumber $ street $ postOfficeBox $ postalCode $
55             postalAddress $ physicalDeliveryOfficeName $ ou $ st $ l
56             )
57             )
58              
59             =cut
60