File Coverage

blib/lib/App/LDAP/ObjectClass/InetOrgPerson.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::InetOrgPerson;
2              
3 1     1   5 use Modern::Perl;
  1         2  
  1         7  
4              
5 1     1   675 use Moose;
  0            
  0            
6              
7             extends qw(App::LDAP::ObjectClass::OrganizationalPerson);
8              
9             has mail => (
10             is => "rw",
11             isa => "ArrayRef[Str]",
12             );
13              
14             has [qw( audio
15             businessCategory
16             carLicense
17             departmentNumber
18             displayName
19             employeeNumber
20             employeeType
21             givenName
22             homePhone
23             homePostalAddress
24             initials
25             jpegPhoto
26             labeledURI
27              
28             manager
29             mobile
30             o
31             pager
32             photo
33             roomNumber
34             secretary
35             uid
36             userCertificate
37             x500uniqueIdentifier
38             preferredLanguage
39             userSMIMECertificate
40             userPKCS12 )] => (
41             is => "rw",
42             isa => "Str",
43             );
44              
45             __PACKAGE__->meta->make_immutable;
46             no Moose;
47              
48             1;
49              
50             =pod
51              
52             =head1 NAME
53              
54             App::LDAP::ObjectClass::InetOrgPerson - schema of inetOrgPerson
55              
56             =head1 DEFINITION
57              
58             objectclass (
59             2.16.840.1.113730.3.2.2
60             NAME 'inetOrgPerson'
61             DESC 'RFC2798: Internet Organizational Person'
62             SUP organizationalPerson
63             STRUCTURAL
64             MAY (
65             audio $ businessCategory $ carLicense $ departmentNumber $
66             displayName $ employeeNumber $ employeeType $ givenName $
67             homePhone $ homePostalAddress $ initials $ jpegPhoto $
68             labeledURI $ mail $ manager $ mobile $ o $ pager $
69             photo $ roomNumber $ secretary $ uid $ userCertificate $
70             x500uniqueIdentifier $ preferredLanguage $
71             userSMIMECertificate $ userPKCS12
72             )
73             )
74              
75             =cut
76