line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package XML::Atom::Categories; |
2
|
|
|
|
|
|
|
|
3
|
2
|
|
|
2
|
|
73483
|
use warnings; |
|
2
|
|
|
|
|
5
|
|
|
2
|
|
|
|
|
80
|
|
4
|
2
|
|
|
2
|
|
12
|
use strict; |
|
2
|
|
|
|
|
3
|
|
|
2
|
|
|
|
|
73
|
|
5
|
2
|
|
|
2
|
|
13
|
use Carp; |
|
2
|
|
|
|
|
5
|
|
|
2
|
|
|
|
|
208
|
|
6
|
|
|
|
|
|
|
|
7
|
2
|
|
|
2
|
|
4188
|
use XML::Atom; |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
8
|
|
|
|
|
|
|
use XML::Atom::Category; |
9
|
|
|
|
|
|
|
use XML::Atom::Service; |
10
|
|
|
|
|
|
|
use base qw(XML::Atom::Thing); |
11
|
|
|
|
|
|
|
|
12
|
|
|
|
|
|
|
__PACKAGE__->mk_attr_accessors(qw(fixed scheme href)); |
13
|
|
|
|
|
|
|
|
14
|
|
|
|
|
|
|
sub element_name { 'categories' } |
15
|
|
|
|
|
|
|
|
16
|
|
|
|
|
|
|
sub element_ns { $XML::Atom::Service::DefaultNamespace } |
17
|
|
|
|
|
|
|
|
18
|
|
|
|
|
|
|
sub XML::Atom::Category::element_ns { $XML::Atom::Util::NS_MAP{$XML::Atom::DefaultVersion} } |
19
|
|
|
|
|
|
|
|
20
|
|
|
|
|
|
|
1; |
21
|
|
|
|
|
|
|
__END__ |