1use 5.10.0; 2use warnings; 3use strict; 4 5use Test::Perl::Critic ( 6 7 -profile => 'xt/perlcriticrc', 8 9 -exclude => [ qw( 10 BuiltinFunctions::ProhibitComplexMappings 11 CodeLayout::RequireTidyCode 12 CodeLayout::RequireTrailingCommas 13 ControlStructures::ProhibitCascadingIfElse 14 ControlStructures::ProhibitDeepNests 15 ControlStructures::ProhibitPostfixControls 16 Documentation::RequirePodLinksIncludeText 17 Documentation::RequirePodSections 18 InputOutput::ProhibitExplicitStdin 19 InputOutput::ProhibitInteractiveTest 20 InputOutput::ProhibitOneArgSelect 21 InputOutput::RequireBracedFileHandleWithPrint 22 InputOutput::RequireEncodingWithUTF8Layer 23 NamingConventions::Capitalization 24 References::ProhibitDoubleSigils 25 RegularExpressions::ProhibitEnumeratedClasses 26 RegularExpressions::RequireDotMatchAnything 27 RegularExpressions::RequireExtendedFormatting 28 RegularExpressions::RequireLineBoundaryMatching 29 Subroutines::ProhibitExcessComplexity 30 Subroutines::ProhibitSubroutinePrototypes 31 Subroutines::ProhibitUnusedPrivateSubroutines 32 Subroutines::RequireArgUnpacking 33 Subroutines::RequireFinalReturn 34 ValuesAndExpressions::ProhibitEmptyQuotes 35 ValuesAndExpressions::ProhibitInterpolationOfLiterals 36 ValuesAndExpressions::ProhibitMagicNumbers 37 ValuesAndExpressions::ProhibitNoisyQuotes 38 Variables::ProhibitPunctuationVars 39 Variables::RequireLocalizedPunctuationVars 40 ) ], 41 42); 43 44 45all_critic_ok(); 46