1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
|
## name No links
## failures 0
## cut
=head1 DOGGEREL
The boy stood on the burning deck,
His feet were full of blisters.
A flame licked up and burned off his pants,
And now he wears his sister's.
=cut
#-----------------------------------------------------------------------------
## name Complying links
## failures 0
## cut
=pod
The L<Perl::Critic|Perl::Critic> source may be found at
L<http://perlcritic.tigris.org/>.
=cut
#-----------------------------------------------------------------------------
## name Non-complying links
## failures 1
## cut
=pod
The L<Perl::Critic> configuration file is F<~/.perlcriticrc>
=cut
#-----------------------------------------------------------------------------
## name Multiple brackets
## failures 0
## cut
=pod
The L<< Perl::Critic->new()|Perl::Critic/new >> method creates an
instance of the L<< Perl::Critic|Perl::Critic >> class.
=cut
#-----------------------------------------------------------------------------
## name If it is inside another formatter it is not really a link
## failures 0
## cut
=pod
Constructions like C<< L<Foo> >> should be avoided, since you never know
what the POD translator is going to turn them into. You should use something
like C<< L<Foo|Foo> >> instead, to be sure of getting C<Foo> in your output.
Formatters of all sorts are recognized even if they cross line boundaries. C<<
L<Foo> >> is still not seen as a link.
=cut
#-----------------------------------------------------------------------------
## name External sections allowed
## failures 0
## parms { allow_external_sections => '1' }
## cut
=pod
L<Perl::Critic/critique> critiques a file, returning any violations found.
L<< $critic->critique()|Perl::Critic/critique >> critiques a file, returning
any violations found.
=cut
#-----------------------------------------------------------------------------
## name External sections not allowed
## failures 1
## parms { allow_external_sections => '0' }
## cut
=pod
L<Perl::Critic/critique> critiques a file, returning any violations found.
L<< $critic->critique()|Perl::Critic/critique >> critiques a file, returning
any violations found.
=cut
#-----------------------------------------------------------------------------
## name Internal sections allowed
## failures 0
## parms { allow_internal_sections => '1' }
## cut
=pod
L</critique> critiques a file, returning any violations found.
L<critique()/critique> critiques a file, returning any violations found.
=cut
#-----------------------------------------------------------------------------
## name Internal sections not allowed
## failures 1
## parms { allow_internal_sections => '0' }
## cut
=pod
L</critique> critiques a file, returning any violations found.
L<critique()/critique> critiques a file, returning any violations found.
=cut
#-----------------------------------------------------------------------------
## name Handle nested format codes RT 65569.
## failures 0
## cut
=pod
See L<C<perldiag>|perldiag> for the gory details.
=cut
#-----------------------------------------------------------------------------
# Local Variables:
# mode: cperl
# cperl-indent-level: 4
# fill-column: 78
# indent-tabs-mode: nil
# c-indentation-style: bsd
# End:
# ex: set ts=8 sts=4 sw=4 tw=78 ft=perl expandtab shiftround :
|
