line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
1
|
|
|
1
|
|
4
|
use strict; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
90
|
|
2
|
|
|
|
|
|
|
|
3
|
|
|
|
|
|
|
push(@::bean_desc, { |
4
|
|
|
|
|
|
|
bean_opt => { |
5
|
|
|
|
|
|
|
abstract => 'Generic described object', |
6
|
|
|
|
|
|
|
package => 'PerlBean::Described::ExportTag', |
7
|
|
|
|
|
|
|
base => [ qw( PerlBean::Described ) ], |
8
|
|
|
|
|
|
|
use_perl_version => 5.005, |
9
|
|
|
|
|
|
|
description => <
|
10
|
|
|
|
|
|
|
C describes export tags for pod generation in C objects. |
11
|
|
|
|
|
|
|
EOF |
12
|
|
|
|
|
|
|
short_description => 'Tag description', |
13
|
|
|
|
|
|
|
synopsis => "TODO\n", |
14
|
|
|
|
|
|
|
}, |
15
|
|
|
|
|
|
|
attr_opt => [ |
16
|
|
|
|
|
|
|
{ |
17
|
|
|
|
|
|
|
method_factory_name => 'export_tag_name', |
18
|
|
|
|
|
|
|
short_description => 'tag\'s name', |
19
|
|
|
|
|
|
|
type => 'SINGLE', |
20
|
|
|
|
|
|
|
mandatory => 1, |
21
|
|
|
|
|
|
|
allow_empty => 0, |
22
|
|
|
|
|
|
|
allow_rx => [qw(^\w+$)], |
23
|
|
|
|
|
|
|
}, |
24
|
|
|
|
|
|
|
], |
25
|
|
|
|
|
|
|
} ); |
26
|
|
|
|
|
|
|
|
27
|
|
|
|
|
|
|
1; |