1 ## name 1 statement before warnings
8 #-----------------------------------------------------------------------------
10 ## name several statements before warnings
14 $foo = $bar; ## This one violates.
15 $baz = $nuts; ## no critic; This one is exempted
16 $blamo; ## This one should be squelched
19 #-----------------------------------------------------------------------------
21 ## name several statements before warnings with maximum violations changed
23 ## parms { maximum_violations_per_document => 2 }
26 $foo = $bar; ## This one violates.
27 $baz = $nuts; ## This one violates.
28 $blamo; ## This one should be squelched
31 #-----------------------------------------------------------------------------
33 ## name no warnings at all
39 #-----------------------------------------------------------------------------
41 ## name no warnings at all with "use 5.005"
48 #-----------------------------------------------------------------------------
50 ## name no warnings at all with "use 5.006"
57 #-----------------------------------------------------------------------------
59 ## name require warnings
66 #-----------------------------------------------------------------------------
68 ## name warnings used, but no code
74 #-----------------------------------------------------------------------------
76 ## name -w used, but no code
82 #-----------------------------------------------------------------------------
84 ## name -W used, but no code
90 #-----------------------------------------------------------------------------
92 ## name no warnings at all, w/END
98 #Should not find the rest of these
104 Foo - A Foo factory class
108 #-----------------------------------------------------------------------------
110 ## name no warnings at all, w/DATA
116 #Should not find the rest of these
125 #-----------------------------------------------------------------------------
127 ## name warnings used
134 #-----------------------------------------------------------------------------
136 ## name Other module included before warnings
144 #-----------------------------------------------------------------------------
146 ## name package statement before warnings
154 #-----------------------------------------------------------------------------
156 ## name Work around a PPI bug that doesn't return a location for C<({})>.
162 #-----------------------------------------------------------------------------
164 ## name Moose support
171 #-----------------------------------------------------------------------------
173 ## name Moose::Role support
180 #-----------------------------------------------------------------------------
182 ##############################################################################
183 # $URL: http://perlcritic.tigris.org/svn/perlcritic/trunk/Perl-Critic/t/TestingAndDebugging/RequireUseWarnings.run $
184 # $Date: 2008-06-18 16:19:46 -0500 (Wed, 18 Jun 2008) $
185 # $Author: clonezone $
187 ##############################################################################
191 # cperl-indent-level: 4
193 # indent-tabs-mode: nil
194 # c-indentation-style: bsd
196 # ex: set ts=8 sts=4 sw=4 tw=78 ft=perl expandtab shiftround :