1package Perl::Lint::Filter::LikePerlCritic::Cruel;
2use strict;
3use warnings;
4use utf8;
5use Perl::Lint::Filter::LikePerlCritic::Brutal;
6
7sub filter {
8    return [
9        qw{
10            BuiltinFunctions::ProhibitSleepViaSelect
11            BuiltinFunctions::ProhibitStringyEval
12            BuiltinFunctions::RequireGlobFunction
13            ClassHierarchies::ProhibitOneArgBless
14            ControlStructures::ProhibitMutatingListFunctions
15            InputOutput::ProhibitBarewordFileHandles
16            InputOutput::ProhibitInteractiveTest
17            InputOutput::ProhibitTwoArgOpen
18            InputOutput::RequireEncodingWithUTF8Layer
19            Modules::ProhibitEvilModules
20            Modules::RequireBarewordIncludes
21            Modules::RequireFilenameMatchesPackage
22            Subroutines::ProhibitExplicitReturnUndef
23            Subroutines::ProhibitNestedSubs
24            Subroutines::ProhibitReturnSort
25            Subroutines::ProhibitSubroutinePrototypes
26            TestingAndDebugging::ProhibitNoStrict
27            TestingAndDebugging::RequireUseStrict
28            ValuesAndExpressions::ProhibitLeadingZeros
29            Variables::ProhibitConditionalDeclarations
30            Variables::ProhibitEvilVariables
31            Variables::RequireLexicalLoopIterators
32        },
33        @{Perl::Lint::Filter::LikePerlCritic::Brutal->filter},
34    ];
35}
36
371;
38
39